
Ростислав
4 год назад
даны целые числа a b m n. числа a и b , m n умножаются и суммируются. суммы этих чисел выводятся в порядке убывания , а результат умножения в порядке возрастания. Пример вывода сумма А и В =34, М и Н = 11 Произведение А и В = 3 М и Н = 11
ОТВЕТЫ

Аркадий
Oct 24, 2020
program qq;
vara,b,m,n,sum,umn,sum1,umn1:integer;
BEGINwrite('Введите 4 числа: '); readln(a,b,m,n);
sum:= a+b;sum1:= m+n;
umn:= a*b;umn1:= m*n;
writeln('Сумма a и b = ',sum);writeln('Сумма m и n = ',sum1);
writeln('Произведение a и b = ',umn);writeln('Произведение m и n = ',umn1);
END.
vara,b,m,n,sum,umn,sum1,umn1:integer;
BEGINwrite('Введите 4 числа: '); readln(a,b,m,n);
sum:= a+b;sum1:= m+n;
umn:= a*b;umn1:= m*n;
writeln('Сумма a и b = ',sum);writeln('Сумма m и n = ',sum1);
writeln('Произведение a и b = ',umn);writeln('Произведение m и n = ',umn1);
END.
592
Контакты
Спрошу
О проекте
Новым пользователям
Новым экспертам