Предмет: Информатика,
автор: qwertynastya123
Напишите программу на языке Паскаль. Определить, является ли число, введённое с клавиатуры простым.
Ответы
Автор ответа:
11
var n, i: integer;
begin
write('Введите число: ');
readln(n);
i:=2;
while n mod i <> 0 do
i += 1;
if i = n then
writeln('Простое')
else
writeln('Не простое');
end.
Похожие вопросы
Предмет: Математика,
автор: turku8046
Предмет: Физика,
автор: adelamirkhanova
Предмет: Русский язык,
автор: atabek197509082
Предмет: Информатика,
автор: MrKepChik
Предмет: Математика,
автор: dyevrbbd