Урок 30. Цикл FOR. Решение задач. Новые процедуры ввода-вывода

Новые процедуры ввода-вывода

1. Процедура вывода Print 
Стандартная процедура Print работает так же как и write, но разделяет данные при выводе пробелом
Например: вместо Write (a, ' ', b, ' ', c) можно написать Print (a,b,c)

2. Ввод, совмещенный с  приглашением ко вводу
Мы предлагали вам перед вводом переменной писать приглашение ко вводу
Например:
var a: integer;
var b: real;
begin
Write ('Введи целое а и вещественное b ');
Read (a, b);
Теперь то же самое можно записать короче:
a:=ReadInteger('Введи целое а');
b:=ReadReal('Введи вещественное b');

Для каждой задачи нарисовать блок-схему, придумать тестовые данные
Задача 1. Ввести в цикле 10 чисел, каждое вывести на экран. Каждое четное число напечатать 3 раза
Задача 2. Ввести в цикле 6 чисел, каждое вывести на экран. Найти сумму введенных чисел.  Найти среднее арифметическое.

Домашнее задание

 Задание старое, из Урока 29. Прислать учителю информатики до 28.04.19  до 23.00 по школьной эл почте письмо-отчет о выполнении домашнего задания.

Тема письма: 8 кл ДЗ к уроку 29 Паскаль  <ваша фамилия>

Задание Паскаль 6. Написать и отладить  программу
В тетради начертить  блок-схему. К письму присоединить  текст на паскале + скриншот выполненной программы
 pas8_hm_06_name. Введите последовательно 7 целых положительных чисел. Выведите в том же порядке все нечетные числа из данного набора и количество K таких чисел. Предусмотреть 2 набора тестовых данных: в одном есть нечетные числа, а в другом есть только четные числа