Решение задач на компьютере алгоритмизация и программирование

тестирование

Уточнение модели

Этап

Результат

Выполнение расчётов

Получение результата

скоростью, увидев красный свет светофора, нажал на тормоз. После этого скорость автомобиля стала уменьшаться каждую секунду на 5 метров. Требуется найти расстояние, которое автомобиль пройдёт до полной остановки.

Первый этап

Дано:
v0x - начальная скорость;
vx - конечная скорость (равна нулю);
ax - ускорение (равно -5 м/с)
Требуется найти: расстояние, которое пройдёт автомобиль до полной остановки.

дело с прямолинейным равноускоренным движением тела. Формула для перемещения при этом имеет вид:

Упростим эту формулу с учётом того, что конечная скорость равна нулю:

При ax= - 5м/с получим:

виде блок-схемы:

Начало

v0

s

Конец

программирования Паскаль:

program n_1;
var v0, s: real;
begin
writeln ('Вычисление длины пути торможения автомобиля');
write ('Введите начальную скорость (м/с)> ');
readln (v0);
s:=v0*v0/10;
writeln ('До полной остановки автомобиль пройдет', s:8:4,' м.')
end.

ту информацию, что при скорости 72 км/ч с начала торможения до полной остановки автомобиль проходит 40 метров.
Выполнив программу несколько раз при различных исходных данных, можно сделать вывод: чем больше начальная скорость автомобиля, тем большее расстояние он пройдет с начала торможения до полной остановки.

Шестой этап

положение элемента в массиве.

Решение разнообразных задач, связанных с обработкой массивов, базируется на решении таких типовых задач, как:
- суммирование элементов массива;
- поиск элемента с заданными свойствами;
- сортировка массива.

Одномерный массив

Значение элемента массива

Индекс элемента массива

a: array [1..10] of integer;

const b: array [1..5] of integer = (4, 2, 3, 5, 7);

Тип элементов массива

Имя массива

Максимальное значение индекса

Минимальное значение индекса

Значение 1-го элемента массива

Массив b с постоянными значениями описан в разделе описания констант.

10 do read (a[i]);
2 способ. С помощью оператора присваивания (по формуле):
for i:=1 to 10 do a[i]:=i;
3 способ. С помощью оператора присваивания (случайными числами):
randomize;
for i:=1 to 10 do a[i]:=random(100);

a[i]=2*a[i]+6

пробелом:
for i:=1 to 10 do write (a[i], ' ');

2 способ. Вывод с комментариями:
for i:=1 to 10 do writeln ('a[', i, ']=', a[i]);

of integer;

Заполнение массива A(10) случайными числами и вывод элементов массива

randomize;
begin  for i:=1 to 10 do a[i]:=random(100);

for i:=1 to 10 do write (a[i],` `);   end.