Question

составить алгоритм и программу:вывести на экран числа, кратные 2 ( язык Паскаль)

Answer 1

Ввел ввод промежутка от a до b, пользователь сам задает. Потом выводит числа кратные 2.

3d364573867f681eb1d3a91a3bcd7422.pas

Answer 2

program chisla;
uses crt;
var a,b,n,k: integer;
begin
b:=0;
Writeln('Нахождение чисел кратным 2-м');
Writeln('Введите интервал чисел: ');
Readln(n,k);
for a:=n to k do
if (a mod 2=0) then
begin
write(a,' ');
b:=b+1;
end;
end.

3d364573867f681eb1d3a91a3bcd7422.pas