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

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

Question

Информатика

Ромася

22 мая, 10:11

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

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

+1

Ответы (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, если оно положительное, в другом случае уменьшить.