Начала программирования. Диалог. Выражения.Блок-схемы
методическая разработка по информатике и икт (7 класс) по теме

Программа сообщает: «Займемся программированием!». Запрашивает и принимает у пользователя значения исходных данных для подсчета значения формулы:

w3+cos(p)|

-------------------------------------------- ,

5cos(x2)

считает по формуле результат и печатает его на экране. Затем спрашивает: «Будем продолжать?», принимает ответ(буквы «да» или «нет»). Если ответ на вопрос «да», то пишет на экране: «Ладно уж, хватит на сегодня!», а если ответ другой, то сообщает:  «Хорошо, я и сама устала!’. Пообщавшись с пользователем по поводу продолжения, программа прощается с пользователем:

Составить блок-схему алгоритма решения задачи и записать этот алгоритм на языке Паскаль

Program trenirowka;

  Var B:string; w,p,x,z:real;

Begin

  Writeln(‘Займемся программированием!’);

  Writeln(‘Введи значения переменных w,p,x’);

  Readln(w,p,x );

  Z:=(w*w*w + cos(p)) /(5* cos(x*x));

  Writeln(Z);

  Writeln(‘Будем продолжать?’);

  Readln(B);

  If B=’да’

    Then

      Writeln(‘Ладно уж, хватит на сегодня!’)

    Else

      Writeln(‘Хорошо, я и сама устала’);

  Writeln(‘До свидания!’);

  Readln;

end.

Программа спрашивает: «Какой сегодня день недели?», разумеется, принимает ответ (в переменную D). Если ответ на вопрос «понедельник», то сообщает: «Это день тяжелый», а если в ответ пользователь назвал другой день (иначе), то сообщает, что «Это неплохой день». Пообщавшись с пользователем по поводу дней недели, программа приступает к серьезному делу: запрашивает и принимает у пользователя значения исходных данных для подсчета значения формулы:

Sin (b3)+ y3 +2

-------------------------------------------- ,

4t+5

затем считает по формуле результат и печатает его на экране.

Составить блок-схему алгоритма решения задачи и записать этот алгоритм на языке Паскаль