Дано число. Если оно больше 3, то увеличить число на 10, иначе уменьшить на 10 Решить в...

Question

Дано число. Если оно больше 3, то увеличить число на 10, иначе уменьшить на 10 Решить в Паскале

Answer 1

Pascal:

var N: integer;

begin

write('Введите число N=');

read(N);

if N>3 then begin

N:=N+10;

writeln('Увеличиваем число на 10');

end

else begin

N:=N-10;

writeln('Уменьшаем число на 10');

end;

writeln('Новое значение числа N=',N);

end.