tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Пока пользователь вводит
Пока пользователь вводит с клавиатуры чётные числа , суммируйте их . результат выведите на экран pascol через цикл while
Ferzpi
2 13.07.2019 17:50
0
Ответы
anisa2004god
03.10.2020 03:13
Var
num, sum: integer;
begin
sum := 0;
num := 0;
while num mod 2 = 0 do
begin
sum := sum + num;
read(num);
end;
writeln(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Kartakova
27.11.2021 13:41
3. Можно ли в КуМире записывать команды в одну строку? Почему? 4. Как можно в среде КуМир вывести на экран сообщение для пользователя?...
yan551029
27.11.2021 13:44
Пользователь вводит список целых чисел (одной строкой через пробел). Напишите программу, которая создает из указанных чисел список их кубов....
nodiraxon1998
27.11.2021 13:44
Задание на питоне Записать условие (составить логическое выражение), которое является истин- ным, когда: каждое из чисел X, Y , Z кратно пяти;...
sashapeterov85
27.11.2021 13:46
На вход программе подается натуральное число . Напишите программу, которая создает список, состоящий из делителей введенного числа....
valentingordien
30.06.2019 12:20
Меньшее из двух чисел (a,b) уменьшите на 4...
Даниил5356
26.09.2021 06:32
Две программы на Паскале (файлы в формате pas или txt): одна программа через цикл While другая через цикл Repeat. Обе программы должны выдавать на экран все делители целого числа,...
Виктория1950
26.09.2021 06:31
решить , хотя бы первые 3 задания НУЖНО....
evgeniya64
26.09.2021 06:22
написать эссе на тему Умный дом не менее 3 стр с размером 14 Times New Roman....
keklolcheburek1243
02.07.2019 10:50
Как пользоваться равенством i=log2n мощность nалфавита=64 символов; 2i=64; информационный вес одного символа алфавита iсимв.=log264=6 бит . если информационный вес одного символа...
fgrtyrrrrty
11.03.2019 20:50
Нужно написать программу на с++. идет n-я секунда суток. определить, сколько полных часов и полных минут до этого момента. + отформатировать исходный код программы. + определить...
Популярные вопросы
Кто предложил Бородину в качестве сюжета оперы «Слово о полку Игореве»? 2. О событиях...
1
только а) и г) дам корону только...
3
Сформулируйте и докажите утверждение о признаке равенства прямоугольных треугольников...
3
Выбери ряд слов в котором есть лишний глагол Выпиши его и определи почему оно...
3
|| Випишіть дієслова, що означают процеси праці. Визначте б діеслів. Одне з діеслів...
1
Дайте примеры к словам: Аллегория Афоризм Гипербола Гротеск Крылатые слова Метафора...
2
Необходимо решить 14 Номер...
3
Нужно написать программу для задачи. Сформировать массив из n чисел (элементы...
3
Какая из пар чисел (2; 5), (2; 0) является решением уравнения 5х - y=10...
2
Обчисліть маси солі та води, що містяться в розчині масою 270 г, з масовою часткою...
3
num, sum: integer;
begin
sum := 0;
num := 0;
while num mod 2 = 0 do
begin
sum := sum + num;
read(num);
end;
writeln(sum);
end.