Сделать блок-схему этой var summa,count,numb : integer; begin summa: =0; count: =0; readln(numb); while numb < > 0 do begin if numb mod 17 = 0 then begin summa: =summa+numb; count: =count+1; end; readln(numb); end; if (summa > 0) and (count > 0) then writeln(summa,' ',count) else writeln('no'); end.

231

371

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

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

mspanda22

Информатика

4,7(5 оценок)

112 бит(8* кол-во символов(пробелы тоже считаются и точки))

150 000+ пользователей

Оформить подписку