Всем привет ребята! Мне нужна помощь, а у нас программа Pascal ABC ! Не игнорировать !...

0 голосов
32 просмотров

Всем привет ребята! Мне нужна помощь, а у нас программа Pascal ABC ! Не игнорировать ! Будь добрый человек ! Нам 5 заданий


image

Информатика (38 баллов) | 32 просмотров
Дан 1 ответ
0 голосов

Program n_1;

var i, k:integer;

begin

   i:=1;

   for k:=1 to 10 do begin

       writeln(i:6, i*i:6, i*i*i:6);

       i:=i+k;

   end

end.

(3.5k баллов)
0

Спасибо