дано 2 числа уменьшить их на 20, если сумма чисел больше 100, в противном случае просто их выдать ( СРОЧНОООО ПЖЖЖПЖПЖПЖ 20 БАЛЛООВ )

кажется, здесь нет смысла вводить "ИНАЧЕ", потому что и так интересно посмотреть, чему будут равны новые значения переменных.

СПАСИБОООООООООО

СПАСИБООООООООООО

program zadacha;

var

a,b,sum: real;

begin

writeln('vvedite dva chisla');

readln(a,b);

sum:=a+b;

if sum >100 then begin

a:=a-20;

b:=b-20;

end;

writeln('a=',a, ' b=',b);

end.

var a,b:integer;beginwriteln('a, b:');readln(a,b);if a+b>100 then begin a:=a-20; b:=b-20; end;writeln('a = ',a,' b = ',b);end.Пример:a, b:54 81a = 34 b = 61