
Анфим
5 год назад
8 класс, Информатика,паскаль, для заданного числа (18) вывести его делителиПожалуйста посчитайте, пожалуйста
ОТВЕТЫ

Douglas Richard
Oct 24, 2020
var i, x: integer;
begin
x := 18;
for i:=1 to x do
if x mod i = 0 then
writeln(i);
end.
begin
x := 18;
for i:=1 to x do
if x mod i = 0 then
writeln(i);
end.
762
Смежные вопросы: