Войти Регистрация Спроси ai-bota

Даны 2 числа m и n. найти количество четных от m до n.

Ответ:

vitlikkushnirp08qv4

08.10.2020 08:13

Var m, n, k:integer;

begin
readln(m, n);
for var i:=m to n do
if i mod 2 =0 then inc(k);
writeln(k);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

atimaus123

19.04.2021 03:32

Напишите название и функции этих устройств. ...

milenmuradyan

04.03.2021 01:36

Дан массив из 30-ти чисел. найти произведение всех чисел, которые больше заданного числа р. (паскаль)...

isakdzhanova

02.04.2020 05:14

1. Что будет выведено в результате выполнения данной программы: А = [1, 3, 5, 7, 9] n = 5 for i in range(n): A[i], A[n-i-1] = A[n-i-1], A[i] print(*A) 2. Что будет выведено...

elizavetabobrova

20.12.2022 01:25

Отметьте ситуации которые могут привести к возникновению пожара в компьютерном классе а пользование электро и нагревательными приборами случаях когда они остаются без отключения...

Сирена11111

21.02.2021 00:10

Опишите как переместить файл; удалить файл. (только кратенько. пример: скопировать файл: выбрать, скопировать, сохранить в другой папке. результат-два одинаковых файла)...

ANGEL7777771

21.02.2021 00:10

Сообщение, записанное буквами из 64-символьного алфавита, содержит 20 символов. какой объем информации оно несет?...

Alma88

26.06.2022 05:12

При пересечении двух прямых третьей один из углов на 50°Больше другого,найти все углы помгите кр за год это решает сою оченку...

natalijamatijch

12.01.2021 10:23

Найти частную производную функции: f(x, y) =e^x+x^2 y-y^3.Вычислить f x(0;-1) f y=(-3;1)...

Вадик151

05.03.2022 12:09

26.1 Сәкен Сейдуллин өмір сүрген жылдарын ата...

sveta998

12.07.2020 09:07

Определите расстояние до Юпитера, когда его горизонтальный параллакс равен 1,6 минуты ( горизонтальный параллакс Солнца равен 8,8 минуты )...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку