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

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

Линейный алгоритм

Читайте также:
  1. C. Ветвящихся алгоритмов
  2. CТРУКТУРЫ ДАННЫХ И АЛГОРИТМЫ
  3. III. Алгоритмическая конструкция ветвление и ее использование в языке Visual Basic
  4. IV. Алгоритмическая конструкция цикл и ее использование в языке Visual Basic
  5. LINUX|| Алгоритм замещения страниц в ОС Linux.
  6. Алгоритм
  7. АЛГОРИТМ
  8. Алгоритм
  9. Алгоритм FIFO (перша прибула - перша вивантажена)
  10. Алгоритм MD5

 

Простейшей алгоритмической структурой является линейная последовательность операций, которые выполняются по очереди и именно в том порядке, в котором они записаны. Линейные алгоритмы и линейные программы обычно предназначены для решения относительно простых задач.

Например: Написать программу вычисления площади треугольника по трем сторонам, пользуясь формулой Герона.

 

Program tr;

var

a, b, c, p, s: real;

begin

writeln(’Введите длины сторон треугольника’);

readln(a,b,c);

p:= (a + b + c)/2;

s:= sqrt(p*(p - a)*(p - b)*(p - c));

writeln(’Площадь треугольника =’, s:5:2);

end.

 

Задача Дано целое трехзначное число А. Написать программу выделения количества сотен и количества единиц этого числа.

 

program p3_3;

var

a, a1, c: integer;

begin

writeln(’Введите число’);

readln(a);

a1:= a mod 10;

c:= a div 100;

writeln(’Количество единиц =’, a1);

writeln(’Количество сотен =’, с);

end.

 

Задача Вычислить площадь кольца, ширина которого равна А, а отношение радиусов окружностей равно В.

 

program p3_5;

var

{s - площадь кольца

a - ширина кольца

b - отношение радиусов

r - расстояние от центра кольца до наружной стороны кольца}

s, a, b, r: real;

begin

write('Введите ширину кольца и отношение радиусов:');

readln(a,b);

r:= (-a*b)/(1 - b);

{Поскольку площадь кольца = разности площадей 2 кругов, радиусом

первого является r, а второго - r-a}

s:= Pi*sqr(r) - Pi*sqr(r - a);

writeln(s);

readln

end.

 

Вопросы для закрепления

 

  1. Назовите основные этапы разработки программы.
  2. Какова структура Паскаль-программы?
  3. Что такое алгоритм? Каковы основные свойства алгоритма? Какими способами можно записать алгоритм?
  4. Запишите основные элементы блок-схем.
  5. В каком году и кем был создан язык Паскаль?
  6. Чем отличается алфавит языка Паскаль от естественных алфавитов?
  7. Что такое лексема?
  8. Какова структура Паскаль-программы?
  9. Что в списке можно рассматривать как идентификаторы:FIO, ФИО, 22222, X, Y, >=, &, $, Summa, _Result
  10. Укажите идентификаторы, которые проще воспринимаются при чтении, объясните причину:

klass; Klass_1; summadoxoda;SummaDoxoda;nomerdoma;Nomer_Doma.

  1. Сколько в следующем списке зарезервированных слов: X, Program, Y, Summa, MyMoney, Произведение, Vova, begin, end, if, repeat, Read?
  2. В каких случаях надо использовать переменные:

– если в программе используется какое-то число?

– если в вычислениях какой-то операнд постоянно меняет свое значение?

– если операнд в выражении хотя бы один раз меняет значение?

  1. Какие заголовки программ правильны:program Zarplata?program Сумма?program Summa Nalogov?программа Teach_Kurs?program 12Kurs?program Summa_Elementov?
  2. Какая структура программы правильна:

Program MyProgram;

Begin

Writeln(‘Привет’);

End.




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




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