Дано a, b, c. Сравнить эти переменные и найти наибольшую. Составить схему алгоритма на отдельном листочке.
Ответы на вопрос
Ответил estengseant
0
var a,b,c,max: Integer;
begin
writeln('Введите a,b,c');
readln(a,b,c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('Наибольшее число: ',max);
end.
begin
writeln('Введите a,b,c');
readln(a,b,c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('Наибольшее число: ',max);
end.
Приложения:
Новые вопросы