Составить программу получающую на входе целое число a. Если a меньше 0, тогда a:=a+3, иначе a:=a-1. Какой результат выдаст программа при a = 0, a = -5, a=5?
Составить программу в паскаль, если можно то скрином из паскаля!
Ответы
Ответ дал:
0
var
a: integer;
begin
Read(a);
if a < 0 then a := a + 3 else a := a - 1;
Writeln('Конечный результат', a);
end.
Тестовое решениеЖ
Введите А := 0
Конечный результат-1
Введите А -5
Конечный результат-2
Введите А -5
Конечный результат 4
Вас заинтересует
1 год назад
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад