Регистрация
halelaiwi
19.06.2022 20:27
Информатика
Есть ответ 👍

Информатика 50 баллов

126
152
Посмотреть ответы 2

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

enterways
enterways
4,8(66 оценок)

привет. все на фото

Объяснение:

если что не понятно, пиши

lisena123409
lisena123409
4,4(64 оценок)
Var a,b,c,max,two: integer; begin writeln('введите 1 число'); readln(a); writeln('введите 2 число'); readln(b); writeln('введите 3 число'); readln(c); max: =a; if max < b then max: =b; if max < c then max: =c; if max=a then begin two: =max; if c < b then two: =b; if c > b then two: =c; writeln(max,'+',two,'=',max+two); end; if max=b then begin two: =max; if c < a then two: =a; if c > a then two: =c; writeln(max,'+',two,'=',max+two); end; if max=c then begin two: =max; if a < b then two: =b; if a > b then two: =a; writeln(max,'+',two,'=',max+two); end; end.

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