3) - 1
4) - 3
5) - 2
Все просто.......
Var S:real;
Begin
Write('Введите сумму покупки: ');ReadLn(S);
Write('Сумма покупки с учётом скидки: ');
if S <= 1000 then WriteLn(S)
else if S > 10000 then WriteLn(S*0.8:0:2)
else WriteLn(S*0.9:0:2);
WriteLn('Без учёта скидки: ',S:0:2);
End.
Человек получает информацию с помощью органов чувств. Осязание и обоняние не обработает компьютер
Вроде-бы контрол пробел но если не правильно могу подсказать на MacBook
Озеро Байкал считается морем по своим размерам. Там постоянные ветра, дожди, снег и прочее. В прилегающих районах другой климат, так как они отдалены от Байкала.
Это своими словами