Даны два числа X и Y.Если их произведение больше 20,то найти их сумму ,иначе найти их разность.Вывести результат.
Ответы
Ответ дал:
1
var x,y,z:real;
begin
readln (x);
readln (y);
if x*y>20 then z:=x+y else z:=x-y;
writeln (z);
end.
begin
readln (x);
readln (y);
if x*y>20 then z:=x+y else z:=x-y;
writeln (z);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
7 лет назад