Question

35 баллов Заполни пропуски в программе.Вывод на экран кубов чисел от 13 до 3.var? :integer;beginfor m:= ? downto ? dowriteln (m*m*m);readln;end.​

Answer 1

var

m:integer;

begin

for m:= 13 downto 3 do

writeln (m*m*m, 'm' );

Readln;

end.

Answer 2

Ваш запрос содержит несколько пропусков, которые требуется заполнить. Вот исправленный вариант программы:

pascalCopy code
var
  m: integer;
begin
  for m := 13 downto 3 do
    writeln(m * m * m);
  readln;
end.

В этой программе переменная m идет от 13 до 3, и для каждого значения m будет вычислен и выведен на экран куб числа.