PascalABC Написати програми для обчислення таких задач: Задача 1. Озером назустріч один одному рівномірно прямолінійно рухаються два катери. На початок відстань між катерами становить L м. Швидкість руху першого катера дорівнює V1 м/с, другого V2 м/с. Через який час катери зустрінуться? Яку відстань подолає до зустрічі перший катер?

Формули, якими ви будете користуватися при написанні програм: t=L/(V1-V2) L1=V1*t L2=L-L1

Задача 2. У воду масою m1 кг, узяту за температуру t1 С, додали m2 кг гарячої води, що має температуру t2 C. Якою буде температура води? Вважайте, що теплообмін із довкіллям не відбувається.

Формула, якою ви будете користуватися при написанні програм: t=(m2*t2+m1*t1)/(m1+m2)

Var i:integer;M:array[1..10]of integer;A,F:real;B,C:integer;begin
writeln('Введите элементы массива: ');for i:=1 to 10 doreadln(M[i]); //основной массивA:=0; //сумма от.элементовif M[i] < 0 then A:=A+M[i];writeln('Сумма отрицательных элементов массива: ',A);B:=0; //кол-во чётных элементов массиваif M[i] mod 2 = 0 then B:=B+1;writeln('Количество чётных элементов массива: ',B);i:=1;if(M[i]>0)theni:=i+1; C:=i;writeln('Номер первого положительного элемента массива: ',C);F:=C+((A+B)/(10-C+A));writeln('Значение формулы: ',F);end.

1. Файл – это:
г) Программа или данные на диске, имеющие имя
2. Выбери правильное имя файла:
в) 9 класс А.doc
3. Расширение в имени файла указывает на:
б) тип файла
4. Укажи полное имя файла:
а) A:\Windows\System\pole.exe   
5. Укажи расширение файла:
е) exe
6. C:\Ivanov\Petrov\PROGS\prog1.pas. Какая папка является дочерней для папки Ivanov?
б) Petrov
7. Файловая система – это:
а) совокупность всех файлов на диске    
8. Текущий диск – это диск:
а) диск, с которым пользователь работает в данный момент времени
9. С какой файловой системой работает операционная система на компьютерах в вашем классе:
?
а) простой,
б) многоуровневой,
в) сложной

10. Какие из расширений в списке используются для файлов, содержащих графические изображения:
б) jpeg;
д) bmp.