Написать программу для : вводим число с клавиатуры. - вопрос №9683636 от timkoa 17.05.2023 20:17

Question

Информатика: Написать программу для : вводим число с клавиатуры. если оно положительное, то прибавляем к нему 1; если оно отрицательное, то вычитаем 2; иначе заменяем на 10. вывести на экран полученное число

timkoa · Answer

var a:integer; begin readln (a); if a 0 then a:=a+1 else if a 0 then a:=a-2 else a:=10; writeln(a) end....