1)Даны два числа А и В на 10 . Выбрать большее из них и удвоить .2)Увеличить число А на 10 , если оно положительное , в другом случае уменьшить .
1)Даны два числа А и В на 10 . Выбрать большее из них и удвоить .
2)Увеличить число А на 10 , если оно положительное , в другом случае уменьшить .
Ответ(ы) на вопрос:
1)
var
a,b:integer;
begin
readln(a,b);
if a>b then writeln(a*2);
if b>a then writeln(b*2);
end.
2)
var
a:integer;
begin
readln(a);
if a>0 then writeln(a+10);
if a<0 then writeln(a-10);
end.
Надеюсь на лучший ответ
Не нашли ответ?
Похожие вопросы