Регистрация
marinaovechkina
14.07.2022 04:18
Информатика
Есть ответ 👍

Сделайте в экселе задание, никак в учебнике написано, а в таблице нужно даю!

149
452
Посмотреть ответы 1

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

kalvifa
kalvifa
4,4(36 оценок)
Var   i,s,m: integer; begin   for i : = 1000 to 9999 do    begin     if (i div 10 mod 10 = 2) and (i div 100 mod 10 = 2) then begin       s: =s+i;       m: =m+1;     end;   end;   writeln('сумма-',s,' кол-во-',m); end.

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