дано число х увеличьте его на 20 если оно не отрицательно, во всех остальных случаях уменьшить на 10
Помогите по братски
Даю 10 баллов
Ответы
Ответ дал:
1
Ответ:
//Pascal
var
a: integer;
begin
readln(a);
if a > 0 then a := a + 20
else
a := a - 10;
writeln(a);
end.
Вас заинтересует
3 месяца назад
3 месяца назад
5 месяцев назад
5 месяцев назад
1 год назад
1 год назад
7 лет назад