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