Program n_63 var n, del:integer; begin writeln ('Введите целое число'); readln (n); for del:=i to n dive 2 do; if n mod del=0 then writeln (del) end. встречено '2' а ожидалось ';' что это значит?
Ошибка в программе заключается в том, что в цикле for вместо "dive" должно быть "div", и вместо "i" должно быть "1". Также пропущена фигурная скобка после вывода значения del. Вот исправленный вариант программы:
Program n_63 va n, del: integer begi writeln ('Введите целое число');
readln (n);
for del := 1 to n div 2 d begi if n mod del = 0 the writeln (del) end end.
Ошибка в программе заключается в том, что в цикле for вместо "dive" должно быть "div", и вместо "i" должно быть "1". Также пропущена фигурная скобка после вывода значения del. Вот исправленный вариант программы:
Program n_63
va
n, del: integer
begi
writeln ('Введите целое число');
readln (n);
for del := 1 to n div 2 d
begi
if n mod del = 0 the
writeln (del)
end
end.