!!!!!!Определить является ли число простым!!!!!!!
5-9 класс
|
простое число- это натуральное число, имеющее только два натуральных делителя - единицу и само себя.
например 2 3 5 7 11 13 17 19 и т.д.
Простым числом является целое число, которое не делится без остатка ни на какое другое число, кроме на единицу и самого себя
Другие вопросы из категории
кодом КОИ-8? все тома меют однаковые количества станиц, на одной странице помещаются 64 строки. строка состоит из 64 символов
2)Сколько бит игформации получено из сообщения ''Мой друг живет на 8 этаже'' , если в доме 16 этажей?
A alt
B Ctrl
C Shift
D Delete
Читайте также
№20. Даны величины углов треугольника. Определить является ли это треугольник:
а) остроугольным
б) тупоугольным
в) прямоугольным
г) равносторонним
д) равнобедренным.
№21. Определить, какая из двух точек - M1(x1,y1) или M2(x2,y2) - расположена ближе к началу координат. Вывести на экран дисплея координаты этой точки.
№22. Даны действительные числа a, b, c, x, y. Выяснить, пройдет ли кирпич с ребрами a,b,c в прямоугольное отверстие со сторонами x и y. Просовывать кирпич в отверстие разрешается только так, чтобы каждое из его ребер было параллельно или перпендикулярно каждой из сторон отверстия.
№23. Написать программу, которая печатает True или False в зависимости от того, выполняются или нет заданные условия:
а) квадрат заданного трехзначного числа равен кубу суммы цифр этого числа;
б) сумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифр;
в) среди цифр заданного трехзначного числа есть одинаковые;
г) среди первых трех цифр из дробной части заданного положительного вещественного числа есть цифра 0.
Например, 17 и 43 - простые числа.Для решения задачи приведена программа с пропущенными строками. Необходимо в ответе записать содержание пустых строк, которое сделает программу правильной. Количество и расположение строк не менять.
Program Task;
Uses CRT;
Var n,i:integer;
b:boolean;
Begin
repeat
write('Число='); readln(n);
until n>0;
b:=true;
пропущена строка надо чтото записать
repeat
снова пропущена строка и надо что то записать
i:=i+1
Определить оканчивается ли оно цифрой 7.
числа В. и наоборот?
составить программы на паскале