Создайте массив из пять фамилий. и выведите их на экран столбиком, начиная с последнего

Question

Дарья Малахова

Информатика

11 февраля, 20:33

Создайте массив из пять фамилий. и выведите их на экран столбиком, начиная с последнего

+1

Ответы (1)

Знаешь ответ на этот вопрос?

Вера Коровина · Answer 1

Program qq;

Var a:array [1 ... 5] of real;

I:integer;

Begin

Writeln ('vvodi dannie');

For i:=1 to 5 do readln (a[i]);

Writeln;

For i:=1 to 5 do writeln (a[i]);

End.