Penn
6 год назад
помоги очень прошу вводим с клавиатуры число ,если оно меньше -5 или больше 5 вывести на экран символ ,,$'' иначе,,@''
ОТВЕТЫ
Rajko
Oct 24, 2020
Var
A:real;
Begin
Write('Введите число: ');ReadLn(A);
if Abs(A)>5 then Write('$')
else Write('@')
End.
A:real;
Begin
Write('Введите число: ');ReadLn(A);
if Abs(A)>5 then Write('$')
else Write('@')
End.
556
Смежные вопросы:
