Оператори й основні типи даних мови С++ (стр. 2 из 2)

#include <conio.h>

#include <iostream.h>

#include <stdio.h>

void main( )

{

clrscr;

int sum = 0; //оголошення змінних цілого типу

int n = 0;

int i;

cout << "Ryad chisel = ";

for (i=0; i<=8; i++) { //цикл знаходження чисел кратних 5

n = i*5;

gotoxy((3*i)+15,1); cout << n;

sum = sum + n;

}

cout << endl <<"Summa chisel = "<< sum ;

cout << endl <<"Poslednee chislo = "<< n ;

getch();

}

Результати роботи програми.

Мал. 6. Результат работи програми А3.

б) використовуючи оператор циклу while, знайдіть суму ряду чисел згідно варіанту. Виведіть на екран суму, останній член суми та кількість ітерацій циклу.

№	Тип чисел	Умова
3	цілі, кратні 4	числа від 8 до 100

Програма Б3.

#include <conio.h>

#include <iostream.h>

#include <stdio.h>

void main( )

{

clrscr;

int sum = 0;

int end = 0;

int n = 0;

int i = 0;

cout << " Programma summirovaniya chisel kratnih '4' " << endl;

cout << endl;

n = 8;

while (n<=100) {

if ((n % 4) == 0) {

sum = sum + n;

end = n;

}

i++;

n++;

}

cout << "Summa: " << sum << endl;

cout << "Posledniy chlen summi: " << end << endl;

cout << "Kolichestvo iteraciy : " << i << endl;

getch();

}

Результати роботи програми.

Мал. 7. Результат работи програми Б3

Літературні джерела

1. Абрамов С.А., Зима Е.В. Начала информатики. —М.: Наука, 1990.

2. Грогоно П. Программирование на языке Паскаль. - М.: Мир, 1982.

3. Йенсен К., Вирт H. Паскаль. Руководство для пользователя и описание языка. -М.: Финансы и статистики, 1982.

4. Перминов О.Н. Программирование на языке Паскаль. - М.: Радио и связь, 1988.

5. Пильщиков В.Н. Сборник упражнений по языку Паскаль. - М.: Наука, 1989.

6. Прайс Д. Программирование на языке Паскаль. Практическое руководство. М.: Мир, 1987.

7. Турбо Паскаль 7.0. - К.: Торгово-издательское бюро BHV, 1996.

8. Фаронов В.В. Турбо Паскаль 7.0. Начальный курс. Учебное пособие.-М.: «Нолидж», 1997.