программы оператором End c « . »);
б) методом решения задач:
Задание 1
Найти ошибки в программах:
а) Написать программу на Pascal, вычисляющую площадь круга.
Program Z1;
Var R,S: integer;
Begin;
Read (R);
S3,14SQR(R);
Write (S);
End
б) Написать программу, вычисляющую значение функции уу1-у2, если у1 2. 5х, а у25х;
Program Z2;
Var x,y,y1,y2: Real;
Begin;
Write (x);
y: y1- у2;
y1:2. 5x;
у25х;
Read (y);
End.
Задание 2
Написать программу
a) вычисляющую сумму квадратов двух чисел а и b.
Program Z3;
Var a,b,s: Real;
Begin;
Read (a,b);
s:SQR (a) SQR (b);
Write (s);
End.
б) найти скорость равномерного прямолинейного движения тела (значения S и t вводятся с клавиатуры)
Program Z4;
Var t,s: Real;
Begin;
Read (t,s);
v:s/t;
Write (s);
End.
III Формирование новых знаний.
Мы закончили с вами раздел изучения программирования на языке Pascal линейных алгоритмов и теперь переходим к изучению раздела «Алгоритмы ветвления».
Для решения такого типа задач необходимо узнать как выглядит блок оператора условия в графическом способе представления алгоритмов :
нет да
Внесите этот блок в таблицу блоков, составленную нами ранее.
Оператор команды ветвления может быть двух форм: краткой и полной.
Краткая форма записи оператора ветвления используется в задачах с двумя вариантами действий в зависимости от условия, и выглядит следующим образом:
IF THEN ;
Рассмотрим пример:
Найти значение функции у5/х.
"
$
&
È
Ú
8
B
D
Ð
Ô
Ö
&
È
Ô
愁Ĥ摧㕰dᘀÔ
Ö
Напишем программу по созданн
Страницы: << < 1 | 2 | 3 > >>