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' а ожидалось ';' что это значит?
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' а ожидалось ';' что это значит?
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' а ожидалось ';' что это значит?
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Ошибка в программе заключается в том, что в цикле for вместо "dive" должно быть "div", и вместо "i" должно быть "1". Также пропущена фигурная скобка после вывода значения del. Вот исправленный вариант программы:
Program n_63;
var
n, del: integer;
begin
writeln ('Введите целое число');
readln (n);
for del := 1 to n div 2 do
begin
if n mod del = 0 then
writeln (del);
end;
end.