1) Напечатайте таблицу кубов чисел: -10, -8, -6, … 10,2) Определите результат выполнения…

Question

47

1) Напечатайте таблицу кубов чисел: -10, -8, -6, … 10,2) Определите результат выполнения программы (без компьютера) begins: =0; x: =10; repeats: =s+x; x: =x+10; untill x>12; writein ('s=',s); writein ('x=',s); end.

в избранное ссылка

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

lighttf · Accepted Answer

42

lighttf

01 апреля 2023

1) uses crt; var a: integer; begin for a: =-10 to 10 do writeln ('a=',a,',a*a*a: 6); end.-2) 10 10

комментировать

в избранное ссылка отблагодарить