2.разносчик пиццы себастьян не гнушается брать чаевые. за смену он успевает сделать d доставок(минимум 1,максимум 18). в среднем на чай он получает 1.25$. он так привык,что ему на чай,что расстраивается,когда ему меньше. зато когда ему больше 3$,он радуется. посчитайте,сколько раз за смену себастьян радуется,а сколько расстраивается.

chuksin2008 chuksin2008    2   22.07.2019 03:00    0

Ответы
sashik2005 sashik2005  03.10.2020 10:14
Pascal

var d, i, o, r:integer;
a:real;
begin
read(d);
r:=0;o:=0;
for i:=1 to d do
begin
read(a);
if a < 1.25 then r:=r+1; 
if a > 3 then o:=o+1;
end;
writeln('rad - ', o);
writeln('ras - ', r);
end.
2.разносчик пиццы себастьян не гнушается брать чаевые. за смену он успевает сделать d доставок(миним
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика