Читайте также: |
|
Begin
X:=Y+100;
End.
раздел var?
раздел const?
раздел type?
раздел begin....end.?
раздел label?
{Программа вычисляет логарифм введенного числа};
(*Это тоже комментарий*);
{{Комментарий в комментарии}};
(*{И это комментарий в комментарии}*);
{(*Еще один вариант*)};
(*(*Самый последний вариант*)*);
Program Test;
Begin
End.
1) такого слова нет в языке Турбо Паскаль;
2) это какой-то пользовательский идентификатор;
3) с его помощью подключают стандартные библиотеки;
4) это стандартная константа, равная 3,14;
5) это логическая операция.
1) да, только стандартные;
2) нет, только пользовательские;
3) и стандартные, и пользовательские;
4) такого раздела вообще не может быть в программе.
Program Tutor;
Begin
Writeln(5*6);
Writeln(‘Привет’);
End.
Каков будет результат ее выполнения?
Измените программу чтобы результат равнялся 35.
Program Ошибки1;
Begin
Summa:=6+8;
End;
Исправьте программу и добейтесь компиляции без ошибок.
Program Ошибки2;
{{Программа с ошибками}}
Begin
var x:integer;
x:=5*3;
Write(x);
End.
Исправьте программу и добейтесь компиляции без ошибок.
Program MyError;
Ses
{(*Программа с ошибкой*)}
Begin
End.
Исправьте программу и добейтесь компиляции без ошибок.
Program Kvadr;
Begin
Writeln(‘введите значение Х’);
Writeln(‘Х в квадрате=’, Х*Х);
End.
Var X:integer;
Исправьте программу и добейтесь компиляции без ошибок.
Begin
Writeln(‘введите значение Х’);
Readln(X);
Writeln(‘введите значение Y’);
Readln(Y);
Сумма:=X+Y;
Writeln(Сумма);
End.
Задачи:
Y=x*2, p=2*(x+y), w=t*60, v=p/w
x – сторона, , L=2*p*Rнайти чему равна длина окружности при Х=2.56789, и Х=345.678 с точностью до 3 знаков после запятой.
3. Определите периметр правильного n -угольника, о писанного около окружности радиуса r.
4. Вычислить объем цилиндра, вписанного в правильную шестиугольную призму, у которой каждое ребро равно a.
5. Вычислить массу свинцовой трубы, длина которой L метров (плотность 11,4 г/см3), толщина стенок А мм, а внутренний диаметр R мм.
6. Определить время, через которое встретятся два тела, равноускоренно движущиеся навстречу друг другу, если известны их начальные скорости, ускорения и начальное расстояние между ними.
7. Три сопротивления R 1, R 2, R 3, соединены параллельно. Найти общее сопротивление соединения.
8. Стальной вал, имеющий L мм длины и D метров в диаметре, обтачивается на токарном станке, причем диаметр уменьшается на S мм. Вычислить на сколько уменьшится масса вала. (плотность стали - 7,4 г/см3)
9. Вычислить площадь кольца, ширина которого равна А, а отношение радиусов окружностей равно В.
10. Определить силу притяжения между двумя телами массы М1 и М2, находящимися на расстоянии R друг от друга.
11. Найти площадь сектора, радиус которого равен R, а дуга содержит заданное число радиан А.
12. Даны v 1, v 2, t 1, t 2. Пусть смешано v 1 литров воды температуры t 1 с v 2 литрами воды температуры t 2. Вычислить объем и температуру образовавшейся смеси.
13. У квадрата ABCD на плоскости известны координаты двух противоположных вершин – точек А и С. Найти координаты двух остальных точек В и D.
14. Треугольник задан координатами своих вершин. Найдите сумму медиан треугольника.
15. Угол А задан в градусах, минутах и секундах. Найти его величину в радианах (с максимально возможной точностью).
16. Заданы моменты начала и конца некоторого периода времени в часах, минутах и секундах. Найти продолжительность этого периода в том же виде (в пределах одних суток).
17. Известен объём шара V. Найдите диаметр данного шара.
Дата добавления: 2014-12-19; просмотров: 47 | Поможем написать вашу работу | Нарушение авторских прав |