Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
30 ноября 2022 02:08
802
Написать программу нахождения суммы большего и меньшего из 3-х чисел.для "паскаль"
1
ответ
Var a,b,c,min,max,s: integer;
begin
write('Ведите числo а '); readln(a);
min:=a; max:=a;
write('Ведите числo b '); readln(b);
if b<min then min:=b;
if b>max then max:=b;
write('Ведите числo c '); readln(c);
if c<min then min:=c;
if c>max then max:=c;
writeln('Сумма min + max = ',min+max);
end.
begin
write('Ведите числo а '); readln(a);
min:=a; max:=a;
write('Ведите числo b '); readln(b);
if b<min then min:=b;
if b>max then max:=b;
write('Ведите числo c '); readln(c);
if c<min then min:=c;
if c>max then max:=c;
writeln('Сумма min + max = ',min+max);
end.
0
·
Хороший ответ
2 декабря 2022 02:08
Остались вопросы?
Еще вопросы по категории Информатика
Укажите, какой из перечисленных программных продуктов является текстовым редактором, имеющим средства форматирования и включения графики: 1. Corel; 2...
Что такое деловая графика?Какой вид имеет условная функция ? Как она выполняется ?...
Музыкальный фрагмент был оцифрован и записан в виде файла без использования сжатия данных. Получившийся файл был передан в город А...
один из первых отечественных персональных компьютеров БК-0010 имел оперативную память 16 Кбайт.Сколько страниц текста можно было бы разместить в памят...
Доклад на тему основные этапы развития ИКТ Помогите пожалуйста!...