Напиши те программу в Паскале : Даны x и y .Если x больше y то число заменить их квадратами .В противном случае число удвоить . ОЧЕНЬ НАДО !!
Напиши те программу в Паскале :
Даны x и y .Если x>y то число заменить их квадратами .В противном случае число удвоить . ОЧЕНЬ НАДО !!
Гость
Ответ(ы) на вопрос:
Гостьvar
a,b:integer;
begin
readln(a,b);
if a>b then
begin
a*=a;
b*=b;
end else
begin
a+=a;
b+=b;
end;
end.
Не нашли ответ?
Похожие вопросы