Последовательность.
Блин, это просто, он это будет делать по цепочке, как и перечислила его мать.
Если есть заварка, то я пойду пить чай, иначе не пойду.
вот если это перевести в пример получится ¬a∨¬b=f
Program ghjkligohqfaqruyfgeyfqgwqc;
var a, b, c, i :integer;
BEGIN
writeln (' Введите два числа, первое должно быть меньше и еще число делитель');
readln (a, b, c);
for i:=a to b do
begin
if (a*a) mod c=0 then
writeln (a*a);
a:=a+1;
end;
end.