Измерение информации



бет63/94
Дата27.09.2023
өлшемі11,54 Mb.
#110921
түріУрок
1   ...   59   60   61   62   63   64   65   66   ...   94
For I :=1 To Do
S:=S+I; {тело цикла}


Работа в группах

Посчитать сумму первых 1000 натуральных чисел
После запуска программы вы должны увидеть результат: 500500. Что делает наша п
Рограм


строка. Описываем переменные i (параметр цикла) и sum (конечная сумма) как целые;
5 строка. Начальному значению суммы sum присваиваем 0. Это называется инициализация начальной переменной;
6 строка. Числа будем складывать от 1 до 1000;
7 строка. На каждой последующей итерации цикла к сумме прибавляем i;
8 строка. После выхода из цикла (когда будет i = 1000) выводим конечный результат суммы.

Вместе с классом записать код на доске.


Первичная проверка понимания
Напечатать "столбиком" все целые числа от 12 до 25.
Если промежуточное выводимое число обозначить n, то изменяя его с 12 по 25 включительно, выведем все числа. Только здесь нужно задействовать оператор вывода writeln – с переводом курсора на следующую строку.
Код Pascal

1
2
3
4
5
6
7

var
n: byte;


begin


Достарыңызбен бөлісу:
1   ...   59   60   61   62   63   64   65   66   ...   94




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет