А) найти сумму членов вводимые в числовой последовательности, признаком конца является 0. б) составить программу вывода нечетных чисел от 1 до 10 используя цикл while.
esmeraldadoctor
2
21.05.2019 14:40
0
Другие вопросы по теме Информатика
arina0826
14.12.2021 15:22
mkazancev228
14.12.2021 15:25
vikaganzha
16.05.2021 17:29
JuliaNikolaenko13
16.05.2021 17:28
TurboDan
24.02.2021 10:04
naithon00
24.02.2021 10:06
Sultikutan
24.02.2021 10:09
asylkhanova05
24.02.2021 10:12
Angelina000477
24.02.2021 10:12
Популярные вопросы
- Найти плошадь круга его радиус равен 1,5 см...
1 - Уфрагмент одного ланцюга молекули днк нуклеотиди розташовані у такій послідовності...
2 - Составь формулы веществ, в состав которых входят атомы: а) na и o; б) h и cl (i);...
2 - Свинцовый и железный цилиндр одинаковой массы нагревают в горячей воде до одинаковой...
3 - Словообразовательное гнездо для слова травма...
3 - Сравните от большего к меньшему числа 17,32,41,87....
1 - Определите число молекул воды, которое соответствует количеству вещества 10 моль....
3 - За предыдущею опять белый медведь весит 1т,а бурый-750кг. на сколько килограммов...
2 - Решите систему неравенств ! {x^2-x 0 {x^2-x 2...
3 - Среди данных уравнений выберете те, которые имеют тот же корень, что и уравнение...
1
var a,i,s,tmp:integer;
begin cls;
readln(a);
while a <> 0 do
begin
s:=s+a;
readln(a);
end;
writeln(s);
end.
var i:integer;
begin cls;
i:=0;
while i <= 10 do
begin
if (i mod 2 <>0) then writeln(i);
inc(i);
end;
end.