ПОМОГИТЕ ПОЖАЛУЙСТА СРОЧНО ИНФОРМАТИКА.

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

ПОМОГИТЕ ПОЖАЛУЙСТА СРОЧНО ИНФОРМАТИКА.


image

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

var

 m :integer;

begin

for m:= 14 downto 4 do

writeln(m*m*m);

readln;

end.

Как ты можешь заметить, на практике всё прекрасно работает. Выводятся кубы от числа 14 до числа 4.


image
(312 баллов)