составить программу для проверки утверждения: "Результат вычислений по формуле x^2+x+41, при 0<=x<=40 являются простые числа ". все результаты вывести на экран

Question

Август

10 января, 18:36

+3

Ответы (1)

Знаете ответ?

Лемира · Answer 1

Program otvet0x40;

var x, i:integer;

begin

for i:=0 to 40 do begin

x:=sqr (i) + i+41;

write (' x (', i,') = ', x) ;

end;

end.