Напишите пожалуйста в форме таблицы решение
1) sum:=0
For i:=7 to do 10 do
Sum:=sum+i;
2) var p, n:integer;
Begin
P:=1;
For n:=7 downto 3 do
P:=p*n;
Writeln(p)
End.
Ответы
Ответ дал:
1
Ответ:
1.
i sum
7 7
8 15
9 24
10 34
2.
n p
7 7
6 42
5 210
4 840
3 2520
Вас заинтересует
1 год назад
7 лет назад
7 лет назад