Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
30 ноября 2022 02:08
768
Написать программу нахождения суммы большего и меньшего из 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. Какая лента используется, чтобы нарисовать фигуры в текстовом 2. Как рисуется прямая линия в программе Word? 3. Как нарисовать прямоугольник в прог...
Автоматическое устройство осуществило перекодировку информационного сообщения на русском языке, первоначально записанного в 16-битовом коде Unicode, в...
Запишите раздел описания переменных,необходимых для вычисления: а) значения функции y=x^2 б) площади прямоугольника в) стоимости покупки, состоящей...
Для записи текста использовался 256-символьный алфавит. Каждая страница содержит 30 строк по 70 символов в строке. Какой объем информации содержат 5 с...