8класс, напишите программу на pascal abc по этой . именно программу которую можно скопировать напрямую в сам паскаль, большое . сама : "вводится n целых чисел, определите количество чисел кратных 10"
volden05
2
16.05.2019 19:22
0
Другие вопросы по теме Информатика
ghc6
02.09.2019 14:30
viktoska87
02.09.2019 14:30
екатерина2102
26.10.2019 21:23
masha12566
26.10.2019 21:12
Katуа07
26.10.2019 21:05
nastyyya4
26.10.2019 21:05
школьник62728474щ3
26.10.2019 21:02
UnicornAshad
26.10.2019 20:59
дана403
08.07.2019 05:50
Dremachka
23.11.2020 20:17
Популярные вопросы
- Значение y соответствующее x равно минус 1,25 -0,75 и 2,5 и 4...
2 - 1. температура у кімнаті 20 °с. точка роси визначена гігрометром...
2 - Если инспектор гибдд увидят что водитель проехал перекресток на...
3 - 11 жаттығу- суреттерге қарап тұрақты сөз тіркестерін тап. 12 жаттығу-...
3 - 1. у трикутнику abc проведено медіани ak, bm i cn. яка довжина відрізків...
2 - Почему н.в. гоголь в своей повести сделал так, чтобы все главные...
1 - Вконус радиус основания которого равен 6 см, образующая 10 см, вписан...
1 - Рассмотрите таблицу и скажите можно ли отнести слова в таблице к...
2 - За пристрою зображеного на рисунку визначили прискорення вільного...
1 - Определите степень окисления...
1
Объяснение
var n,i,a,b:integer;
begin
b := 0;
write('введите n - '); readln(n);
for i:= 1 to n do begin
write('введите a - '); readln(a);
if a mod 10 = 0 then
b := b + 1;
end;
write('количество чисел кратных 10 - ', b);
end.