Составить АЛГ:а) Дано числа x,y. найти максимальное из 2-х чисел, из 3-х чисел.
Составить АЛГ:
а) Дано числа x,y. найти максимальное из 2-х чисел, из 3-х чисел.
Гость
Ответ(ы) на вопрос:
Гость2 chisla
var a,b:integer;
begin
read (a , b);
if (a>b) then
write (a)
else
write (b);
end.
3 chisla
var a,b,c:integer;
begin
read (a , b , c);
if (a>b>c) then
write (a)
else if (b>a>c) then
write (b)
else if (c>a>b) then
write (c)
end.
Не нашли ответ?
Похожие вопросы