Студопедия  
Главная страница | Контакты | Случайная страница

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Задание 5.3

Читайте также:
  1. I. Теоретическое задание.
  2. II. Практическое задание №1. Ряды распределений и их характеристики
  3. II. Практическое задание.
  4. II. Практическое задание.
  5. II. Практическое задание.
  6. III. Индивидуальное задание студента на практику
  7. IV. Конкурсное задание
  8. IV. Практическое задание №3. Модель множественной регрессии
  9. V. Домашнее задание.
  10. А) Контрольное задание 1

Даны два целых числа А и В (A<B).Найти сумму квадратов всех целых чисел от А до В включительно.

Рис.11 – Блок-схема алгоритма

 

Листинг программы

program primer9;

var I,S,A,B:integer;

begin

write('A=');

readln(A);

write('B=');

readln(B);

for I:=A to B do

S:=I*I+S;

write('S=',S);

end.

 

Задание 5.4

Дано целое число N (>0). Найти сумму 1+1/2+1/3+…+1/N.

Рис.5.4 – Блок-схема алгоритма

 

Листинг программы

program primer10;

var I,N:integer; S:real;

begin

write('N=');

readln(N);

for I:=1 to N do

S:=1/I+S;

write('S=',S);

Writeln(‘Программу составила Зарипова Ирина Булатовна − студентка группы КС-111’);

readln;

end.

 

Задание 5.5

Дано целое число N(>0). Найти сумму N*2+(N+1)*2+…+(N+55)*2.

Рис.5.5 – Блок-схема алгоритма

 

 

Листинг программы

program primer11;

var I,N,S:integer;

begin

write('N=');

readln(N);

for I:=0 to 55 do

S:=(N+I)*2+S;

write('S=',S);

Writeln(‘Программу составила Зарипова Ирина Булатовна − студентка группы КС-111’);

readln;

end.

 




Дата добавления: 2014-12-23; просмотров: 27 | Поможем написать вашу работу | Нарушение авторских прав




lektsii.net - Лекции.Нет - 2014-2024 год. (0.007 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав