Информатика, опубликовано 2018-08-22 20:09:12 by Гость

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

Ответ оставил Гость

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(,i, = ,x[i]);
end;
Readln;
end.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.