Вывести на экран 10 чисел с шагом 2 с через паскаль с цикла с параметром,
Например как :
Var x, i: integer;
X:=10;
Fro i:=10 downto 1 do
begin
Writeln ('x=', x) ;
x:=x-1
end;
End.

Question

Информатика: Вывести на экран 10 чисел с шагом 2 с через паскаль с цикла с параметром, Например как : Var x, i: integer; X:=10; Fro i:=10 downto 1 do begin Writeln ( x= , x) ; x:=x-1 end; End. ​

NarkoBaronTif · Accepted Answer

49Объяснение:n = 10цикл для i от 1 до n - 1 n - 1 = 10 - 1 = 99 - 1 + 1 = 9 (количество повторов цикла = конечное значение i - начальное значение i + 1)цикл выполнится 9 разесли выполняется условие A[i] A[i-1], то значение A[i] вычисляется по формуле A[i] = A[i] - A[i-1]s = 0i = 1 A[1] A[0]   5 7   (НЕТ) s = 0 + A[1] = 0 + 5 = 5 i = 2 A[2] A[1]   13 5   (ДА) A[2] = A[2] - A[1] = 13 - 5 = 8 s = 5 + A[2] = 5 + 8 = 13 i = 3 A[3] A[2]   7 8   (НЕТ) s = 13 + A[3] = 13 + 7 = 20 i = 4 A[4] A[3]   5 7  ...

Вывести на экран 10 чисел с шагом 2 с через паскаль с цикла с параметром, Например как :Var x, i: integer;X:=10;Fro i:=10 downto 1 do begin Writeln ('x=', x) ;x:=x-1end;End.​

MOGZ ответил

Вывести на экран 10 чисел с шагом 2 с через паскаль с цикла с параметром,
Например как :
Var x, i: integer;
X:=10;
Fro i:=10 downto 1 do
begin
Writeln ('x=', x) ;
x:=x-1
end;
End.