Среди 10 чисел,введенных с клавиатуры,найти сумму тех,которые кратны 2. программа в паскале)
AnnaGlyuza0436
1
23.08.2019 20:20
0
Другие вопросы по теме Информатика
alinasastun0
22.09.2019 01:01
Ртдотк
13.12.2021 15:47
alinademushkina1
13.12.2021 15:44
pomogyte67
19.02.2021 18:15
алинагг
06.05.2020 06:21
imrangaraev
06.05.2020 06:20
Популярные вопросы
- Ребят надо! 2 ВАРИАНТ задания 1,2,3...
2 - (b+8,5)x=85 Сколько будет b и x...
2 - мама сказала если не сделаешь то на день рождения ничего не получишь...
2 - Розібрати по 2 частинам мови:сучасне;минуле;майбутнє ...
3 - Рисуя чертеж, прямой x + 3y = 5 и окружности (x – 1)2 + (y – 3)2 = 25, найди...
2 - раскрыть скобки правильно употребив артикуль и дополните предложения. Ich nehme...
1 - Романтичне й приземлене, буденне у творі Тореадори з Васюківки. Будь ласка по...
3 - Choose the right answer to the following question. When did they buy this white...
1 - B Underline the correct item. I 1 Jan went outside and took/held a deep breath....
2 - Подскажите название этих формул...
1
var a,i,sum: integer;
begin
sum:=0;
for i:=1 to 10 do
begin
readln(a);
if a mod 2=0 then sum:=sum+a;
end;
writeln(sum);
end.