Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
pril1.doc
Скачиваний:
26
Добавлен:
31.05.2015
Размер:
604.67 Кб
Скачать

Раздел var?

раздел const?

раздел type?

раздел begin....end.?

раздел label?

  1. Какие из комментариев неправильны:

{Программа вычисляет логарифм введенного числа};

(*Это тоже комментарий*);

{{Комментарий в комментарии}};

(*{И это комментарий в комментарии}*);

{(*Еще один вариант*)};

(*(*Самый последний вариант*)*);

  1. Есть ли причины к невыполнению следующей программы:

program Test;

begin

end.

  1. Для чего используется слово uses?

  1. такого слова нет в языке Турбо Паскаль;

  2. это какой-то пользовательский идентификатор;

  3. с его помощью подключают стандартные библиотеки;

  4. это стандартная константа, равная 3,14;

  5. это логическая операция.

  1. В разделе процедур и функций описываются только стандартные процедуры?

  1. да, только стандартные;

  2. нет, только пользовательские;

  3. и стандартные, и пользовательские;

  4. такого раздела вообще не может быть в программе.

  1. Наберите и откомпилируйте простейшую программу:

program Tutor;

begin

Writeln(5*6);

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

end.

Каков будет результат ее выполнения?

Измените программу чтобы результат равнялся 35.

  1. Где ошибки (их три) в следующей программе?

Program Ошибки1;

begin

Summa:=6+8;

end;

Исправьте программу и добейтесь компиляции без ошибок.

  1. Где ошибки (их три) в следующей программе?

Program Ошибки2;

{{Программа с ошибками}}

begin

var x:integer;

x:=5*3;

Write(x);

end.

Исправьте программу и добейтесь компиляции без ошибок.

  1. Где ошибка в следующей программе?

Program MyError;

ses

{(*Программа с ошибкой*)}

begin

end.

Исправьте программу и добейтесь компиляции без ошибок.

  1. Напишите самую короткую программу.

  2. Где ошибка в следующей программе?

Program Kvadr;

begin

Writeln(‘введите значение Х’);

Writeln(‘Х в квадрате=’, Х*Х);

end.

Var X:integer;

Исправьте программу и добейтесь компиляции без ошибок.

  1. Где ошибка в следующей программе?

begin

Writeln(‘введите значение Х’);

Readln(X);

Writeln(‘введите значение Y’);

Readln(Y);

Сумма:=X+Y;

Writeln(Сумма);

end.

Задачи:

  1. Длина сада Х метров, ширина в два раза больше. Мальчик оббежал сад за Т мин. Найти скорость мальчика в секунду, произвести расчеты для Х=689.67 Т=7.6 с точностью до 2 знаков после запятой/

Y=x*2, p=2*(x+y), w=t*60, v=p/w

  1. Найти длину окружности, описанной около квадрата со стороной Х см.

x – сторона, , L=2**Rнайти чему равна длина окружности при Х=2.56789, и Х=345.678 с точностью до 3 знаков после запятой.

  1. Определите периметр правильного n-угольника, описанного около окружности радиуса r.

  2. Вычислить объем цилиндра, вписанного в правильную шестиугольную призму, у которой каждое ребро равно a.

  3. Вычислить массу свинцовой трубы, длина которой L метров (плотность 11,4 г/см3), толщина стенок А мм, а внутренний диаметр R мм.

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

  5. Три сопротивления R1, R2, R3, соединены параллельно. Найти общее сопротивление соединения.

  6. Стальной вал, имеющий L мм длины и D метров в диаметре, обтачивается на токарном станке, причем диаметр уменьшается на S мм. Вычислить на сколько уменьшится масса вала. (плотность стали - 7,4 г/см3)

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

  8. Определить силу притяжения между двумя телами массы М1 и М2, находящимися на расстоянии R друг от друга.

  9. Найти площадь сектора, радиус которого равен R, а дуга содержит заданное число радиан А.

  10. Даны v1, v2, t1, t2. Пусть смешано v1 литров воды температуры t1 с v2 литрами воды температуры t2. Вычислить объем и температуру образовавшейся смеси.

  11. У квадрата ABCD на плоскости известны координаты двух противоположных вершин – точек А и С. Найти координаты двух остальных точек В и D.

  12. Треугольник задан координатами своих вершин. Найдите сумму медиан треугольника.

  13. Угол А задан в градусах, минутах и секундах. Найти его величину в радианах (с максимально возможной точностью).

  14. Заданы моменты начала и конца некоторого периода времени в часах, минутах и секундах. Найти продолжительность этого периода в том же виде (в пределах одних суток).

  15. Известен объём шара V. Найдите диаметр данного шара.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]