Помогите с заданиями по информатике

Question

Помогите с заданиями по информатике

---

Comments

Понял только второе...

---

ну хотя-бы второе помоги

---

Окей

---

Только я щас добавлю, он будет сплошным текстом. Я отредактирую в течение минуты, ты обновишь страницу

---

Готово

Answer 1

Var  a, b: integer;
begin
  writeln('Введите два целых числа:');
  readln(a, b); 
  for a := a to b do
    if a mod 2 = 0 then writeln(a)
end.

Comments

от души))