Задание 1 с клавиатуры вводится одно число N. Найти произведение всех чисел от 1 до N. Задание 2

Цикл

Случайные числа. 

Кроме четырех действий арифметики, Паскаль может выполнять и 

другие математические действия, например возведение в квадрат, для 

чего имеется специальная функция- Sqr (сокращение от английского 

слова square-"квадрат"). Неполный список математических функций 

Паскаля:

 

Действие 

Результат 

Смысл 

Sqr(5) 

25 

возведение в квадрат 

Sqrt(25) 

5 

корень квадратный 

Pi 

3.1415.. 

число пи 

Frac(23.192) 

0.192 

дробная часть числа 

Int(3.98) 

3.0 

целая часть числа 

Round(5.8) 

6 

округление 

Abs(-20) 

20 

абсолютная величина (модуль) числа 

Random 

0.72088 

случайное число из диапазона (0-1) 

Random(200) 

107 

случайное целое число из диапазона (0-199) 

 

Пример 1. Найти произведение n чисел.  

 

Пример 2. Написать слово привет 10 раз. 

 

Пример 3. Вывести 10 случайных чисел от 0 до 100. 

 

Задание 3.1 С клавиатуры вводится одно число N. Найти 

произведение всех чисел от 1 до N. 

Задание 3.2 С клавиатуры вводится 7 чисел. Найти сумму чисел, 

которые кратны трем. 

Задание 3.3 Игровой автомат. Вводится три случайных числа a, b, 

c от 1 до 5. Если все три одинаковые, то вывести “ВЫ ВЫИГРАЛИ  

10000000”, иначе «ЕЩЕ ПОВЕЗЕТ». (сами числа выводить) 

Задание 3.4 С клавиатуры вводится время (цифра от 1 до 24). Если 

введено число от 6 до 12 то вывести «Доброе утро!», eсли введено 

число от 13 до 17 то вывести «Добрый день!», eсли введено число 

от 18 до 23 то вывести «Добрый вечер!», eсли введено число от 24 

до 5 то вывести «Доброй ночи!». 

Задание 3.5 Вводится целое число N (N<1000000). Выяснить, 

является ли данное число простым.