Есть ответ 👍

Цифры какие системы счисления приведены на рисунке 1.1 ​

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

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

tar02
4,5(76 оценок)

uses system; var ch,min,max,i: integer; begin cls;

readln(ch); min: =ch; max: =ch;

while(ch< > 0) dobegin readln(ch); if ((min > ch) and (ch< > 0)) then min: =ch; if max < ch then max: =ch; inc(i); if i > 999 then break; end;

writeln('max = ', max); writeln('min= ',min); writeln('suma max + min = ',max+min); readln; end.

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