Есть ответ 👍

[1
4. Определите записи представленного алгоритма «Пополнение счёта».​

227
380
Посмотреть ответы 1

Ответы на вопрос:


1.) var s, i: integer; begin for i: =-30 to 40 do if i mod 2 < > 0 then s: =s+i; writeln(s); end.2.)var s, i: integer; beginfor i: =-50 to 120 doif i mod 9 = 0 then s: =s+1; writeln(s); end.3.)var p, i: integer; beginfor i: =-10 to 20 dobeginif i=1 then p: =1; if i mod 11 = 0 then p: =p*i; end; writeln(p); end.4.)var n, d, i, p: integer; beginp: =1; write('введите n> > '); readln(n); for i: =1 to n dobeginwrite('введите ', i, '-ое число> > '); readln(d); p: =p*d; end; writeln(p); end.

Популярно: Информатика