Запустить программу на выполнение. найти и исправить - вопрос №391138 от adelya606 09.04.2020 07:52

Question

Информатика: Запустить программу на выполнение. найти и исправить синтаксические ошибки. введите элементы массива (-1, 5, 45, 0, 2). program massiv_1a; var a: array [1..20] of integer i,k: intege begin write( введите количество элементов массива не более 20: ); read(k); for i: =1 to k do read(a) end.

adelya606 · Answer

Var a:Array [1..20] Of Integer;i:Integer;k:Integer;Begin write( Введите количество элементов массива не более 20: ); Read(k); For i:=1 To k Do       Read(a[i]);End....