Lachanzud
6 год назад
Дано 2 числа уменьшить их на 20, если сумма чисел больше 100, в противном случае просто их выдать ( СРООООЧООООООО ПЖЖЖ )
ОТВЕТЫ
Шульц
Jul 8, 2019
Var
A.b:integer;
Begin
Readln(a.b);
If a+bgt;100 then
Writeln(a-20, ,b-20)
Else
Writeln(a, ,b)
End.
Это изи
A.b:integer;
Begin
Readln(a.b);
If a+bgt;100 then
Writeln(a-20, ,b-20)
Else
Writeln(a, ,b)
End.
Это изи
206
Смежные вопросы:
