Построить программу в pascal. "даны четыре целых числа. определить сколько из них четных." надо завтра сдать, !
starprichal
3
21.05.2019 16:40
15 
Популярные вопросы
- Рассчитайте силу тяжести действующую на автомобиль массой 2 тонны? а)2000...
1 - Переведите предложения 1. some of einstein’s ideas made possible the atomic...
1 - Построить по сольфеджио в си-мажоре: т64,d53,d2,т6,s53,к64,d7,t53н...
1 - Физкультура что относится к объективным показателям самоконтроля? вес,пульс...
2 - Выполни деление уголком 25623: 34 и, пользуясь полученной записью, найди...
1 - Почему фернан магеллан отправился в свое путешествие?...
3 - 1. complete the letter. put the verbs in correct form. we have various...
2 - Расстояние между а и в 50 км. из города а в город в выехал велосипедист,...
2 - Газ при давлении 8 ат и температуре 12 ос занимает объем 855 л. каково...
2 - Лучший ответ гарантирован окружность касается сторон угла в точках a и...
2
var i,r,a:integer;
begin cls;
r:=0;
For i:=1 to 4 do
begin
read(a);
if a mod 2 = 0 then inc(r);
end;
writeln('chetnyh = ',r);
readln;
end.