Pascal Знакомство с языком. Цикл с условием продолжения работы. Практическая 4

Практическая работа 4

Тема: Программирование циклических алгоритмов си условием продолжения работы

Задание:

1. Задание 1.

   1. Выполните Задание 1 в среде ABС Pascal. NET

   2. Сохраните результат в своей папке.

   3. Покажите результат работы программы учителю.

2. Задание 2.

   1. Выполните Задание 2 по своему варианту (номер в журнале).

   2. Оформите отчет по шаблону в файле
      x:\8 класс\Отчет по практической работе паскаль.docx

   3. Покажите результат работы программы учителю.

3. Оценка “5” если выполнены два задания, оформлен отчет по Заданию 2
   “4”- сдано Задание 1, отлажена программа Задание 2 без отчета;
   “3” – выполнено только первое задание.

Задание 1

• Составьте программу по образцу, используйте свое Ф.И. и класс;

• Выполните программу в среде ABС Pascal.NET;

• Исправьте ошибки;

• Выполните программу для тестовых значений

• Введите значения.

• Покажите результат учителю.

Образец:

program nod;

var

a, b: integer;

begin

writeln ('Программа расчёта НОД двух чисел.);

writeln Введите два числа.');

readln (a, b);

while ab do

if ab

then a:=a-b;

else b:=b-a;

write ('НОД равен ', a);

end.

Задание 2

Составить программу

• программа должна выводить на экран ФИ и класс учащегося.

• программа должна выводить на экран задание.

• Значения числовой последовательности вводится с клавиатуры. В конце последовательности вводится 0.

• Значение y выводиться в формате на 5 позиций.

1. Напишите программу, которая в последовательности целых чисел определяет количество нечётных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести: количество нечётных чисел, кратных 3.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел, кратных 5, и определяет их сумму. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести: сумму чисел, кратных 5.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет количество чётных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести сумму чётных чисел.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет количество положительных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести количество положительных чисел.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет количество, кратных 5. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести: количество чисел, кратных 5.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет сумму чисел, кратных 3. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести: сумму чисел, кратных 3.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет сумму чётных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести: сумму чётных чисел.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет их сумму отрицательных чисел последовательности. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести сумму отрицательных чисел.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет сумму положительных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести сумму положительных чисел.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет сумму, кратных 5. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести: сумму чисел, кратных 5.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет их количество отрицательных чисел последовательности. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести количество отрицательных чисел.

Пример работы программы:

1. Напишите программу, которая в последовательности целых чисел определяет количество положительных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести количество положительных чисел.

Пример работы программы: