Заповніть масив "К" із восьми елементів, значеннями з клавіатури і вівести в рядок вказавши його порядковій номер написати блок схему та программу

Заповніть масив "К" із восьми елементів, значеннями з клавіатури і вівести в рядок вказавши його порядковій номер написати блок схему та программу
Гость
Ответ(ы) на вопрос:
Гость
Var x: array[1..8] of longint; Var i,a : longint; Begin for i:= 1 to 8 do begin; readln(a); x[i] := a; end; Writeln('Массив K:'); for i:= 1 to 8 do begin; writeln('Элемент массива K с индексом ',i,' = ',x[i]); end; Readln(a); end. //Строчку в конце "Readln(a)" Можно не писать, она нужна, чтобы программа остановилась и ты увидел результат
Не нашли ответ?
Ответить на вопрос
Похожие вопросы