пользователь вводит 2 числа, перемножить сумму, найти разность произведения и их суммы:)
Answers & Comments
Deddik
Program job_1; var a,b,s,d, : integer; begin writeln('введите два числа '); readln(a,b); s:=a*b; writeln('После умножение',s); d:=a-b; writeln('Вычитание',d); end. НА ПАСКАЛЕ
Answers & Comments
var
a,b,s,d, : integer;
begin
writeln('введите два числа ');
readln(a,b);
s:=a*b;
writeln('После умножение',s);
d:=a-b;
writeln('Вычитание',d);
end.
НА ПАСКАЛЕ