Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 3; если нулевым, то заменить его на 17. Вывести полученное число.
Ответы
Ответ дал:
0
Ответ:
program If3;
var
N : Integer;
begin
Write('Введите целое число: ');
Readln(N);
if N>0 then N:=n+1;
if N<0 then N:=n-3;
if N=0 then N:=17;
writeln(N);
end.
Объяснение:
Решение Pascal
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад