Составьте программу на Паскале вывести на экран элементы одномерного массивного формированного из Квадратов чисел натурального ряда 1,2,3, ... 10, ...

Question

Информатика

Тимоша

23 октября, 14:43

Составьте программу на Паскале вывести на экран элементы одномерного массивного формированного из Квадратов чисел натурального ряда 1,2,3, ... 10, ...

+3

Ответы (1)

Знаете ответ?

Сильва · Answer 1

Var i, t:integer;

l:array[1 ... 100000000] of longint;

begin

writeln ('Введите до какого числа вычислять квадрат') ;

readln (t) ;

For i:=1 to t do

begin

l[i]:=sqr (i) ;

write (l[i], ' ') ;

end;

end.