блин белое на белом, еле прочла, вы уважаете вообще тех кто это читать будет?

Ответы и объяснения

2013-11-14T15:31:31+04:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.
Var i , a ,b :integer;
Begin
  read(a,b);
  for i := a to b do
     writeln(i:10, i*i:10, i*i*i:10);

  writeln;
  a:=1;
  for i := 1 to 10 do begin
    writeln(a:10, a*a:10, a*a*a:10);
    a := a + i;
  end;
End.