Помогите пожалуйста! Написать программу.
Дано целое число. Если оно является положительным, то прибавить к нему 20, а в противном случае вычесть из него 5.
Ответы на вопрос
Ответил Veter0k
0
program HelloWorld;var a:integer;begin readln(a); if(a>0) then a:=a+20 else a:=a-5; writeln(a);end.
Новые вопросы