Page 40 - 4260

t:=1; // Ініціалізація добутку
for i:=1 to 10 do // Цикл добутку
begin
s:=0; // Обнуління суми
for j:=10 downto 1 do s:=s+Cos(i*j*x); // Цикл
t:=t*s;
end;

4.4 Контрольні запитання
4.4.1. Переваг вико операторі циклів у
програмі.
4.4.2. Оператор циклу for...to...do.
4.4.3. Оператор циклу for...downto...do.
4.4.4. Різни мі операторами for...to...do і
for...downto...do.
4.4.5. до змінної циклу операторах
for...to...do і for...downto...do.
4.4.6. Організація обчислення суми.
4.4.7. Організація обчислення добутку.

4.5 Рекомендована литература
4.5.1 Ко Т.В. Осно програмування. Підручник
вищих навчальн закладів. – К.: Видавн група BHV,
2005. – 384 с.
4.5.2. Бажено В.А. і ін. Інформатика. Комп’ютерна
техніка. Комп’ютерні технології: Підручник. – К.: Каравела,
2003. – 464 с.
4.5.3. Г л и н с ь к и й Я . М ., А н о х і н В . Є ., Р я ж с ь к а В . А .
Паскаль. Turbo Pascal i Delphi. 2-e доп. Вид. – Львів: „Деол”,
2001. – 144 с.

40