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

Question

Информатика

Абрам

26 июня, 16:24

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

+3

Ответы (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.