Составить программу на pascal abc. составить программу которая вычисляет сумму всех нечетных и кол-во четных чисел от 10 до 99
liliakhalilova
2
14.03.2019 03:30
8
Другие вопросы по теме Информатика
MrHelpOnline
14.06.2019 00:40
daniilraubuhin
14.06.2019 00:40
SharkiLoge
01.10.2019 13:24
sabin200089
16.10.2020 06:23
Лиза2Няша
16.10.2020 06:22
Artuom1111
16.10.2020 06:18
Reson1
16.10.2020 06:18
hophip2
16.10.2020 06:18
Популярные вопросы
- Периметр трикутника дорівнює 20 дм. Дві його сторони рівні між собою і кожна з...
3 - Решите неравенство, ответ запишите в виде промежутка. 1) 6х меньше или равно или...
1 - Укажи варианты ответов, в которых во всех словах одного ряда пропущена безударная...
2 - 1 min 40 s; 2 min 8 s; 3 min20 s: 4 min 10 s: 5 min 50 s: 6 min 40 s...
1 - Заданы стороны треугольников. Выберите все прямоугольные треугольники...
3 - Дана таблица. z 2,0,2,_ 1 y 2,20,0,8,_ 1) Зависимость, приведённая в таблице —...
3 - The alien friends or but Dalo isn t very happy becoch. Bongohooojenieswimming underwater,...
1 - Видовая пара к слову заблистали...
3 - Задача Рычагом подняли камень весом 1500Н длина плеч рычага 20см и 60 см. Какую...
3 - Название признака по двум катетам! Если катеты одного треугольника равна катетам...
1
Program n1;
Uses CRT;
Const n=7;
Var i,k,s: integer;
begin
for i:=10 to 99 do
if i mod 2=1 then s:=s+i
else k:=k+1;
writeln('Summa nechetnyx =',s,' a chetnih chisel ',k);
readln
end.