Дано N оценок (от 2 до 5). Сколько среди них двоек и четверок? Pascal
saaashaaa4656
2
02.06.2021 12:01
2
Другие вопросы по теме Информатика
katyakantalins
10.12.2020 23:42
Anna050503
10.12.2020 23:38
sfinks98
14.02.2021 19:38
suvorovka06
12.04.2021 11:22
zuldzbeysengaz
12.04.2021 11:23
Wolceme
19.06.2019 23:00
iraromanova2002
19.06.2019 23:00
alanuit
19.06.2019 23:00
adamoon44
02.10.2019 22:01
Популярные вопросы
- Спгодня выставляют оценки!...
3 - С этого можно уравнение привести к виду линейного уравнения...
3 - Сколько раз минутная стрелка и часовая стрелка часов образуют прямоугольник с...
1 - Рисунки по системе координат...
3 - Она выслушала его рассказ и, чтобы не обидеть его, грустно улыбнулась. Нужна...
1 - Қазақстандағы алғашқы кітапханалар қазақ мәдениетінің дамуына үлес қосты ма?...
2 - Художественное и время. Русалка в своей песне поет о юноше: «Спит витязь чужой...
1 - Надо составить 10 предложений с использованием этого правила,(правило на фотке)...
3 - УМОЛЯЮ РЕШИТЕ ТОЛЬКО С:ВСЕГО- Р- ...
1 - кто может решить ?F(x)=2x³-5x²-4x+2...
3
var x,i,n:integer;
var a:array[1..99999] of integer;
begin
readln(n);
x:=0;
for i:=1 to n do begin
readln(a[i]);
end;
for i:=1 to n do begin
if (a[i]=2) or (a[i]=4) then
inc(x);
end;
writeln(x);
end.