Перший потяг виїхав з пункту a в пункт b. через деякий час з пункта a в тому самому напрямі виїхав другий потяг, швидкість якого на 30 км/год більша, ніж швидкість першого потяга. дослідіть, на якій відстані від пункту à другий потяг наздожене перший залежно від їх швидкостей і часу, через який виїхав другий потяг. створіть для дослідження електронну таблицю і проект у середовищі візуального проектування. збережіть електронну книгу у вашій папці у файлі з іменем завдання 2.1.а. збережіть проект у папці завдання 2.1.а, створеній у вашій папці.
як це зробити в excel? !
1) достаточно большой объем
2) не очень большая цена (по сравнению в переносными внешними жесткими дисками)
3) быстрый переноса информации
4) не требуется домолнительных прграмм для сохранения информации
5) есть возможность работать прямо с носителя.
многое это есть и у других носителей, но например дискеты обладают маленькой памятью, для работы сс дисками надо иметь и дисковод и, что бы записать туда информацию, необходимо программу. А переносной внешний жеский диск имеет достаточную стоимость, что не покараману некоторым.
var
a: array [1..20] of 2..5; //Массив оценок учеников
i: integer;
n: array [2..5] of 2..5; //Массив счетчиков оценок
begin
for i:= 2 to 5 do //Обнуляем счетчики оценок
n[i]:= 0;
for i:= 1 to 20 do //Вводим оценки учеников и считаем их
begin
writeln('Введите оценку ', i, ' ученика');
readln(a[i]);
if a[i] = 2 then n[2]:= n[2] + 1;
if a[i] = 3 then n[3]:= n[3] + 1;
if a[i] = 4 then n[4]:= n[4] + 1;
if a[i] = 5 then n[5]:= n[5] + 1;
end;
for i:= 2 to 5 do
writeln('Количество получивших ', i, ' за диктант равно: ', n[i]); {Выводим значения счетчиков}
end.