Напишите программу, которая получает с клавиатуры натуральное число и определяет, простое оно или нет. Для этого нужно делить число на все натуральные числа, начиная с 2, пока не получится деление без остатка. Паскаль
Ответы
Ответ дал:
0
var num, i:integer;
begin
readln(num);
for i:=2 to num do
if num mod i = 0 then break;
if i = num then writeln('число простое')
else writeln('число составное');
end.
begin
readln(num);
for i:=2 to num do
if num mod i = 0 then break;
if i = num then writeln('число простое')
else writeln('число составное');
end.
Ответ дал:
0
Здравствуй дорого друг! Не поможешь мне пожалуйста с этим? https://znanija.com/task/29194856
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад