Если число f равно 26, то увеличить его на 9, иначе уменьшить на 19 - Pascal ABC
Формулировка задачи:
помогите, пожалуйста, написать команду "если...то...иначе" для решения следующей задачи:
если число f равно 26, то увеличить его на 9, иначе уменьшить на 19
Решение задачи: «Если число f равно 26, то увеличить его на 9, иначе уменьшить на 19»
textual
Листинг программы
program pr; var f:integer; begin writeln('Введите число'); readln(f); if (f=26)then begin f:=f+9; end else f:=f-19; writeln('f= ',f); end.
Объяснение кода листинга программы
- Программа начинается с объявления переменной
f
типаinteger
. - Выводится сообщение
Введите число
, чтобы пользователь мог ввести значение для переменнойf
. - С помощью функции
readln
считывается введенное пользователем значение и сохраняется в переменнойf
. - В блоке
if
проверяется равенство значения переменнойf
26. - Если условие истинно (т.е.
f
равно 26), то значение переменнойf
увеличивается на 9 с помощью оператора+=
. - Если условие ложно (т.е.
f
не равно 26), то значение переменнойf
уменьшается на 19 с помощью оператора-=
. - Выводится сообщение
f=
, с тем чтобы пользователь увидел новое значение переменнойf
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д