8 класс, Информатика, паскаль, для заданного числа (18) вывести его делители помогите, пожалуйста
8 класс, Информатика, паскаль, для заданного числа (18) вывести его делители помогите, пожалуйста
Гость
Ответ(ы) на вопрос:
Гостьvar i, x: integer;
begin
x := 18;
for i:=1 to x do
if x mod i = 0 then
writeln(i);
end.
Не нашли ответ?
Похожие вопросы