Сделать программу на Pascal, если a больше b, то найти y=a/b, иначе найти y=a*b
Сделать программу на Pascal, если a>b, то найти y=a/b, иначе найти y=a*b
Гость
Ответ(ы) на вопрос:
Гостьprogram wk;
var a,b,y:real;
begin
readln(a,b);
if a>b then y:=a/b else y:=a*b;
writeln(y);
end.
Не нашли ответ?
Похожие вопросы