Составте .определяющую,является ли число х простым.число х введите с клавиатуры.

timursharipov2 timursharipov2    3   19.03.2019 13:30    0

Ответы
Опаснаятётя01 Опаснаятётя01  26.05.2020 03:28

program m1;
var x,del:integer;
begin
write('Введите x: '); readln(x);
write('Делители: ');
for del:=1 to x do
if (x mod del)=0 then
write(del,' ');
writeln;
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика