Ввести число. если оно неотрицательно, вычесть из него 10, в противном случае прибавить к нему 10 ,

rufina1995 rufina1995    1   29.08.2019 13:40    13

Ответы
Anna456anna Anna456anna  06.10.2020 03:00
Var A:real;
Begin
Write('Введите число: ');ReadLn(A);
if A>=0 then A:=A-10
else A:=A+10;
Write(A);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика