begin i := 1; read(n); repeat i := i + 1; if(n mod i = 0) and (n <> i) or (n = 1) then begin write('Число ', n, ' не является простым'); exit; end; until i = trunc(sqrt(n)) + 1; write('Число ', n, ' является простым'); end.
№ Буква Имя 1 Аа а 2 Бб бэ 3 Вв вэ 4 Гг гэ 5 Дд дэ 6 Ее е 7 Ёё ё 8 Жж жэ 9 Зз зэ 10 Ии и 11 Йй и краткое 12 Кк ка 13 Лл эль (или эл) 14 Мм эм 15 Нн эн 16 Оо о 17 Пп пэ 18 Рр эр 19 Сс эс 20 Тт тэ 21 Уу у 22 Фф эф 23 Хх ха 24 Цц цэ 25 Чч че 26 Шш ша 27 Щщ ща 28 Ъъ твёрдый знак 29 Ыы ы 30 Ьь мягкий знак 31 Ээ э (э оборотное) 32 Юю ю 33 Яя
подбирай. У тебя всё получится
Так как каждая буква в слове заменена её порядковым номером в алфавите, а зашифрованная запись состоит только из цифр “1” и “2”, то в слове могут встречаться только буквы “а”, “б”, “й”, “к”, “у” и “ф”. Эти буквы имеют порядковые номера 1, 2, 11, 12, 21 и 22 соответственно.
Первые три цифры “222”. Слово не может начинаться с “ббб”, “бф” и “фб”. Значит, первая буква – “ф”, а вторая – “у” (номера 22 и 21 соответственно) . Следующие две двойки - это буква “ф”, так как нет в русском языке слов, начинающихся с “фубб” или с “фубу”. Следующая буква – “а”, так как после согласной не может стоять “й”. Рассуждая далее, получим слово “фуфайка”.
№ Буква Имя 1 Аа а 2 Бб бэ 3 Вв вэ 4 Гг гэ 5 Дд дэ 6 Ее е 7 Ёё ё 8 Жж жэ 9 Зз зэ 10 Ии и 11 Йй и краткое 12 Кк ка 13 Лл эль (или эл) 14 Мм эм 15 Нн эн 16 Оо о 17 Пп пэ 18 Рр эр 19 Сс эс 20 Тт тэ 21 Уу у 22 Фф эф 23 Хх ха 24 Цц цэ 25 Чч че 26 Шш ша 27 Щщ ща 28 Ъъ твёрдый знак 29 Ыы ы 30 Ьь мягкий знак 31 Ээ э (э оборотное) 32 Юю ю 33 Яя
подбирай. У тебя всё получится
Так как каждая буква в слове заменена её порядковым номером в алфавите, а зашифрованная запись состоит только из цифр “1” и “2”, то в слове могут встречаться только буквы “а”, “б”, “й”, “к”, “у” и “ф”. Эти буквы имеют порядковые номера 1, 2, 11, 12, 21 и 22 соответственно.
Первые три цифры “222”. Слово не может начинаться с “ббб”, “бф” и “фб”. Значит, первая буква – “ф”, а вторая – “у” (номера 22 и 21 соответственно) . Следующие две двойки - это буква “ф”, так как нет в русском языке слов, начинающихся с “фубб” или с “фубу”. Следующая буква – “а”, так как после согласной не может стоять “й”. Рассуждая далее, получим слово “фуфайка”.
i, n: integer;
begin
i := 1;
read(n);
repeat
i := i + 1;
if(n mod i = 0) and (n <> i) or (n = 1) then
begin
write('Число ', n, ' не является простым');
exit;
end;
until i = trunc(sqrt(n)) + 1;
write('Число ', n, ' является простым');
end.