помоги очень прошу
вводим с клавиатуры число ,если оно меньше -5 или больше 5 вывести на экран символ ,,$'' иначе,,@''
Ответы
Ответ дал:
0
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.
Ответ дал:
0
а можете еще помочь вводим с клавиатуры два числа если их произведение больше 0 то выводим на экран их разность иначе сумму
Вас заинтересует
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад