Предмет: Информатика, автор: Akyra

Входные данные
Вводятся целые числа a и b. Гарантируется, что a не превосходит b

Выходные данные
Выведите (через пробел) все четные числа от a до b (включительно).

Примеры
входные данные
2
5
выходные данные
2 4

Ответы

Автор ответа: xoxofrnk
0
var
a:array[1..100] of integer;
b, c, i: integer;
begin
read(b); read(c);
for i:=b to c do   begin
a[i]:=i;
if a[i] mod 2=0 then 
writeln(a[i], ' ');   end;
end. 
Автор ответа: Akyra
0
program problem_predymaute;
var
b,c,i:longint;
BEGIN
read(b,c);
for i:=b to c do
if i mod 2=0 then
write (i,' ');
END.
Автор ответа: xoxofrnk
0
если возьмешь longint, будет расходоваться больше памяти компьютера, а это уже нерациональное использование памяти, за что снимают баллы х)
Автор ответа: Akyra
0
совсем чуток отличается
Автор ответа: xoxofrnk
0
а в названии переменных особо разницы не вижу)
Автор ответа: Akyra
0
ясно, спасибо за совет буду знать :)
Похожие вопросы