Есть ответ 👍

0,49 Мбайт это байт сколько хелп​

174
263
Посмотреть ответы 2

Ответы на вопрос:


490000 байт (десятечная)


Var   i,n: integer;   a: array of integer; begin   readln(n);   setlength(a,n+1);   for i : = 1 to n  do   begin       a[i] : = sqr(i);       write(a[i], ' ')   end; end.

Популярно: Информатика