tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить с while программу
Составить с while программу для нахождения суммы пяти первых четных чисел.
Апслтел
2 17.08.2019 19:30
1
Ответы
Rodionok2341
05.10.2020 01:22
Program v;
Var a,b,n:integer;
BEGIN
while (n < 5) do begin
readln (a);
if (a mod 2 = 0) then begin
b:=b+a;
n:=n+1;
end;
end;
writeln (b);
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
keramix
09.08.2019 03:00
C++ 2. задан числовой массив а[1: m, 1: n]. составить программу поиска элемента массива, который является наибольшим из отрицательных чисел расположенных в строках....
Dalgat0
09.08.2019 03:00
Решить по информатике, . если что проверять нужно будет в паскале. 1.найти максимальный элемент в массиве из 11-ти чисел [0,100] и вывести его порядковый номер. 2.найти минимальный...
HLNLZ
04.10.2019 20:40
Дан целочисленный массив нужно сформировать его с вводом с клавиатуры,найти произведение нечетных чисел массива....
гэлочка
04.10.2019 20:40
Дана одна из кибернетики. определи, теоретической или практической является данная определение путей практического использования установленных фактов и найденных закономерность °теоретическая...
57775858775847575
04.10.2019 20:40
1. какие абстрактные понятия науки позволили сформировать три точки зрения на изучения окружающего нас мира? а) вещество, энергия б) энергия, информация в) ответ №1 и информация...
zwitterlord2
04.10.2019 20:40
Даны два числа а и b . получить их сумму , разность и произведение . написать программу так , чтобы результат выводился полным ответом (например 4*5=20, если были введены числа 4...
guka070806
14.09.2019 08:00
Во сколько раз уменьшится число цифр в записи числа при переводе из двоичной системы счисления в восьмиричную, если в двоичной оно содержало 10 цифр...
онелдпрлпр1
12.08.2019 03:40
1.человек бежит по улице.какое количество информации получит прохожий,который идет по той же улице? 2.вы пришли к другу в понедельник утром.его нет дома.какое количество информации...
KirochkaMirina
12.08.2019 03:40
√x+√y-2xy запишите по правиле паскаль яп...
Herty22436
12.08.2019 03:40
Найти площадь прямоугольника ah, ввести нужно в турбо паскале (информатика 9 класс)...
Популярные вопросы
Исторический комментарий События рассказа относятся кXIX веку, когда на Кавказе...
1
Сколько 4км будет работать на глазах в о2 чтобы получить возможность работать...
3
Индивидуальные, командные и групповые действия в игре Она имеет множество вариантов,...
3
1. Откуда Городничий узнал о приезде ревизора? 2. Почему не была построена церковь...
3
Составь по картинкам диалог...
3
5 речень з двома Дієприслівниковим зворотом...
2
717171718181919929291912929939384902928339018202028303018203918383010833883399*9191929291929929292929292929929292929299:999999999+27727282727728282828292992929291919919199191929192920202020200202020202020202002020202002020200202202020002029202010102010191019199×18818181818190101010101001919191991929283883918473309164028363667+919199192982189191919...
1
Монархии обьединенной Италии...
3
Сполука відрізняється від решти: зоряна ніч,білий сніг,блакитне небо,зелений гай,червона...
3
3. Решите неравенство. 1х- х+5/3-х-1/6 3х+2/224. 17 4х-3 13...
2
Var a,b,n:integer;
BEGIN
while (n < 5) do begin
readln (a);
if (a mod 2 = 0) then begin
b:=b+a;
n:=n+1;
end;
end;
writeln (b);
END.