Составить программу, которая в ответ ** запрос о введении числа прибавляет к нему 1, если...

Question

Составить программу, которая в ответ на запрос о введении числа прибавляет к нему 1, если оно меньше 100 и вычитает 1, в противном случае.
9 класс

Answer 1

Var
a:integer;
begin
readln(a);
if (a<100) then<br>a:=a+1
else 
a:=a-1;
writeln(a);
end.

Comments

9 класс на кумире

---

помоги пожалуйста