Задать 10 целых случайных чисел на отрезке (-20: 40). найти сумму чётных положительных чисел, произведение чисел, кратных 5, количество чисел в отрезке (-10: 10) program chisla; дальше чё
крэкспекс
3
19.03.2019 17:30
1
Другие вопросы по теме Информатика
Agent1597
01.09.2019 03:10
Max2934
01.09.2019 03:10
viktoriya212
15.08.2019 03:40
dubonosova37
15.08.2019 03:40
виталий146
13.05.2020 18:14
Kovalenko2001N
27.05.2019 12:00
sveta760
08.08.2019 22:00
Q3max2011
06.07.2019 08:20
Популярные вопросы
- Желательно письменный ответ >...
3 - При подключении никелинового проводника площадью поперечного сечения0.2...
1 - Tarea 2. Ponga los verbos que aparecen entre paréntesis en la forma adecuada....
2 - Какой характер нагруженного синхронного двигателя, если угол между магнитными...
3 - Определите разряд прилагательных . Укажите их грамматичес />...
2 - Знайдіть сьомий член і суму двадцяти перших членів арифметичної прогресії...
3 - Сколько кг воды нужно выпарить из 0,4 т целлюлозной массы, содержащей 80%,...
1 - пожажуйста умоляю последное задание пожажуйста умоляю последное задание...
3 - Электролиз водного раствора нитрата никеля проводили с никелевым анодом...
2 - Определите изменение тока коллектора ΔIк транзистора, если ток эмиттера...
2
Program chisla;
var a1,a2,a3,a4,a5,a6,a7,a8,a9,10:integer;
begin
write('Введите 10 целых чисел от -20 до 40')
read(a1);
read(a2);
read(a3);
read(a4)
read(a5);
read(a6);
read(a7);
read(a8);
read(a9)
read(a10);