Есть ответ 👍

Даны 3 целых числа a , b, c.найти сумму максимального значения и числа b .паскаль

169
469
Посмотреть ответы 2

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


var a, b, c: integer;

begin

read (a, b, c);

writeln(max(max(a, b), c) + b);

end.


Программа:     clear dimension b[20] for=1 to 20 b[i]=val(inputbox("значения b")) endfor max=b[1] for i=1 to 20 if b[i]> max max=b[i] n=i endif endfor ? max,n блок схему сами сделайте по программе

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