Введите число, если оно не отрицательно, вычесть из него 10. В противном случае прибавить к числу 10.
Введите число, если оно не отрицательно, вычесть из него 10. В противном случае прибавить к числу 10.
Гость
Ответ(ы) на вопрос:
Гостьvar x: integer;
begin
write('Введите число: ');
readln(x);
if x > 0 then writeln( x - 10 )
else writeln( x + 10 );
end.
Не нашли ответ?
Похожие вопросы