Question

ПОЖАЛУЙСТА ПОМОГИТЕ! Запиши программу на языке Паскаль.Вывести на экран числа от 5 до 35 в обратном порядке.vari: integer;beginfor i:= downto dowriteln();readln;end.2. Заполни пропуски в программе.Вывод на экран кубов чисел от 9 до 7.var:integer;beginfor m:= downto dowriteln (m*m*m);readln;end.

Answer 1

№1

var

i: integer;

begin

for i:=35  downto 5 do

writeln(i);

readln;

end.

№2

var

m:integer;

begin

for m:= 9 downto 7  do

writeln (m*m*m);

readln;

end.

Answer 2

Конечно, вот исправленные программы на языке Паскаль:

1. Вывод чисел от 5 до 35 в обратном порядке:

pascalCopy code
program PrintNumbers;
var
  i: integer;
begin
  for i := 35 downto 5 do
    writeln(i);
  readln;
end.

2. Вывод кубов чисел от 9 до 7:

pascalCopy code
program PrintCubes;
var
  m: integer;
begin
  for m := 9 downto 7 do
    writeln(m * m * m);
  readln;
end.

Обратите внимание, что я исправил названия переменных (i и m) и выражения в циклах так, чтобы они работали правильно.