1) Даны два числа А и В на 10. Выбрать большее из них и удвоить.

2) Увеличить число А на 10, если оно положительное, в другом случае уменьшить.

Question

Информатика

Ладимир

2 февраля, 08:06

1) Даны два числа А и В на 10. Выбрать большее из них и удвоить.

2) Увеличить число А на 10, если оно положительное, в другом случае уменьшить.

+4

Ответы (1)

Знаете ответ на вопрос?

Костюра · Answer 1

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.

Надеюсь на лучший ответ

1) Даны два числа А и В на 10. Выбрать большее из них и удвоить.2) Увеличить число А на 10, если оно положительное, в другом случае уменьшить.

1) Даны два числа А и В на 10. Выбрать большее из них и удвоить.

2) Увеличить число А на 10, если оно положительное, в другом случае уменьшить.