Készítette Farkas János
program hazi;
uses crt;
var a,b,c,i:integer;
begin
writeln ('adj meg
2szamot (a m sodik nagyobb legyen):');
readln (a);
readln (b);
for i:= a to b do
begin
writeln (i);
end;
readln;
for i:= a to b do
begin
clrscr;
write
(i/2*(i+1):7:0);
end;
readln;
end.