Ответы на вопрос:
Var a, b, c: integer; beginfor a: =1 to 3 do begin readln(b); if b mod 2 = 0 then c: =b+c; end; writeln('ответ: ',c); end.
Популярно: Информатика
-
Найдите правильную запись выражения на языке Python: * 34.5+24.5/15*у (34.5+24.5)/15у...
Хз1233429.12.2020 07:34 -
Установи соответствие bool Oy= Python int X = 60.8 str b = true float a = 25...
Demonis66615.11.2020 02:11 -
Напишите программу вычисления суммы первых членов геометрической прогрессии...
marinakomarova24.03.2021 06:47 -
В каждой строке файла записано три числа, каждое из которых находится в интервале...
volgaslob24.08.2022 06:15 -
Написать код в С++ Вычислите значение выражения (x+1)^2+3(x+1) при а) x=1.7; б)...
Вадик15111.05.2020 22:34 -
Дана программа на языке программирования Pascal. Определи, что будет выведено...
Настя3456568805.08.2022 14:05 -
Бжб информатика 7 сынып паже көмектесіңіздерші ...
Sima12112.12.2020 02:16 -
3. Екі скриптіні салыстырыңыз. Ұқсастығы мен айырмашылығы неде екенін жазыңыз....
1302201006.07.2022 19:55 -
решите это до 30 апреля 15:00 по мск 1.Верны ли следующие суждения о свободе человека:...
Nicalay08.10.2021 05:36 -
Какое множество точек задается неравенством x·y≤-6?...
sashakameka12.01.2022 21:24