дано число х увеличьте его на 20 если оно не отрицательно, во всех остальных случаях уменьшить на 10
Помогите по братски
Даю 10 баллов
Помогите по братски
Даю 10 баллов
More Questions From This User See All
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
//Pascal
var
a: integer;
begin
readln(a);
if a > 0 then a := a + 20
else
a := a - 10;
writeln(a);
end.