logo
Лекции по TURBO PASCAL

2.7. Самостоятельные задания

Выполните каждое задание тремя способами, используя сначала цикл For, потом While, затем Until.

  1. Вывести на экран 22 звёздочки в ряд.

  2. Дано число N. Вывести на экран N звёздочек в ряд.

  3. Вывести на экран все нечетные чисел из интервала от 1 до 30.

  4. Вывести на экран все нечетные чисел из интервала от 1 до 30 в обратном порядке.

  5. Найти сумму первых 10 чётных чисел.

  6. Найти количество двузначных чисел, у которых первая цифра больше второй.

  7. Найти произведение тех чисел от 1 до 50, которые кратны 17.