Решите задачу по информатикеif 15.Даны три числа. Найти сумму наибольших из них.

Решите задачу по информатике if 15.Даны три числа. Найти сумму наибольших из них.
Гость
Ответ(ы) на вопрос:
Гость
program z1;         var s:integer;         a,b,c:integer; begin         write('a=');readln(a);         write('b=');readln(b);         write('c=');readln(c);         if (a>c) and (b>c) then writeln(a+b);         if (a>b) and (c>b) then writeln(a+c);         if (b>a) and (c>a) then writeln(b+c);         readln end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы