Введите значения переменных a и b типа Byte

3 4

a + b =7

a - b =255

a * b =12

a Div 2 =1

a Mod 2 =1

a ShL 2 =12

b ShR 1 =2

Пример 2. Составить программу вычисления общей поверхности и объема круглого конуса, имеющего радиус основания R=12,54cм и длину образующей L=24,83см. При вычислениях использовать равенства: , где H - высота конуса, определяемая по формуле .

Программа на языке Паскаль в общем случае содержит комментарии, вводящие в смысл задачи, заголовок, раздел определения констант, раздел описания переменных, операторы, оператор окончания. Все элементы программы должны следовать друг за другом в указанном порядке.

Задание исходных данных может быть осуществлено с помощью оператора присваивания Read, либо с помощью специальных операторов ввода. Вычисления по формулам реализуются в порядке определения числовых значений переменных H, S и V соответственно, после чего S и V выводятся на печать.

При вычислениях будет использоваться зарезервированная константа Pi (p=3,1415926).

В качестве имен переменных будем использовать переменные, обозначения которых максимально совпадают с именами самой задачи. Таким образом, выберем следующие имена переменных:

R - радиус основания;

L - длина образующей;

H - высота конуса;

S - полная поверхность конуса

V - объем конуса.

 

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

(* Программа вычисления поверхности и объема круглого конуса *)

Program Conus;

Uses Crt; (* подключаем модуль очистки экрана *)

Var

R, L, H, S, V: Real; (* описываем переменные *)

Begin

ClrScr; (* очищаем экран *)

R:=3; (* через оператор присваивания ':='*)

L:=5; (* присваиваем значения R:=3 и L:=5 *)

S:=Pi*Sqr(R)+R*L; (* производится вычисление S *)

H:=Sqrt(Sqr(L)-Sqr(R)); (* производится вычисление Н *)

V:=(1/3)*Pi*Sqr(R)*H; (* производится вычисление V *)

(* вывод значений R, L, H, V, S *)

Writeln (' Параметры конуса: R=', R:6:3, ' L=', L:6:3, ' H=',H:6:3);

Write ('V=',V:6:3, ' S=',S:6:3);

End.

После запуска программы компьютер нам выдаст результат:

Параметры конуса: R= 3.000 L= 5.000 H= 4.000

V=37.699 S=43.274

4.5. Контрольные вопросы

 

1. Допустимо ли присваивание переменной вещественного типа значения выражения целого типа? Допустимо ли присваивание переменной целого типа значения выражения вещественного типа?

2. Как называются алгоритмы, в которых используется только структура следования?

3. С какого служебного слова начинается программа, написанная на языке Паскаль?

4. Каким символом заканчивается текст программы?

5. Из каких двух основных частей состоит программа?

6. Какое служебное слово используется для описания раздела констант?

7. Каким служебным словом начинается раздел описания переменных?

8. Чем вызвана необходимость использования комментариев в программе?

10. Где в программе можно написать комментарий?

11. Какими символами ограничивается текст комментария?

12. Какое влияние оказывает комментарий на выполнение программы?

13. Какая часть блока, описательная или исполнительная, является обязательной?

14. Верно ли, что в программе, на языке Паскаль надо описывать все используемые переменные?

15. Какой из перечисленных разделов обязателен в программе:

a) раздел Var;

b) раздел Const;

c) раздел Type;'

d) раздел Begin... End;

e) раздел Label?

16. Какие значения имеют переменные в начале выполнения программы?

17. Можно ли в процессе выполнения программы изменять значения констант?

18. Назовите процедуру ввода информации.

19. Каково назначение процедур Write и WriteLn?

20. Следующую последовательность операторов ввода замените одним оператором: Read(Xl); Read(Y2); Read(X3); Read(X4).

21. Сколько аргументов могут иметь процедуры Read и ReadLn?

22. Верно ли, что аргументом процедуры Read может быть список переменных и элементы этого списка разделяются запятыми?

23. Сколько процедур Read может быть в программе?

24. Чем различаются процедуры Read и ReadLn?

25. Пусть в программе есть процедура Read (Xl,Х2,…Хп). Должны ли переменные списка ввода иметь одинаковый тип?

26. Как набираются на клавиатуре значения переменных Xl,Х2,...,Хn для оператора Read (Xl,Х2,…Хп)?

27. Может ли быть пустым список ввода?

28. Надо ли описывать тип переменных, входящих в список ввода?

29. С помощью каких стандартных процедур осуществляется вывод на дисплей?

30. Замените следующую последовательность операторов вывода одним оператором: Write('Зарплата отца = '); Write(z): WriteLn.

31. Может ли элементом списка вывода быть константа?

32. Можно ли с помощью процедуры write напечатать значение выражения?

33. Какова ширина поля десятичного представления величины х при печати в результате выполнения оператора Write(x:7)?

34. Чем отличаются действия процедур Write и WriteLn?

35. Для чего в процедурах вывода Write и WriteLn определяется ширина поля вывода?

 

Варианты заданий

В соответствии со свом вариантом, составить блок-схему и программу. Значения переменных a, b, j, x, a, b – любые.

1.

2.

3.

4.

5.

6.

7.

8.

9.

10.

11.

12.

13.

14.

15.

16.

17.

18.

19.

20.

21.

22.

23.

24.

25.

26.