Предмет: Информатика,
автор: djte
найти сумму большего и меньшего из трех чисел на алгоритмическом языке
antonmolka:
программа годится? как для паскаля
Ответы
Автор ответа:
1
var a,b,c,max,min:integer;
begin
read(a,b,c);
max:=c;
min:=c;
if min>a then min:=a else if min>b then min:=b;
if max<a then max:=a else if max<b then max:=b;
write(min,max);
end.
begin
read(a,b,c);
max:=c;
min:=c;
if min>a then min:=a else if min>b then min:=b;
if max<a then max:=a else if max<b then max:=b;
write(min,max);
end.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: dikoshabzalkyzy
Предмет: Литература,
автор: tojcibekovcingiz
Предмет: Русский язык,
автор: aytv98880
Предмет: Литература,
автор: валиюлла
Предмет: Математика,
автор: Юка111