Предложите этапы построения компьютерной модели для решения : пассажир опоздал на пороход и решил догнать пароход на такси по дороге которая идет вдоль берега реки. средняя скорость 100 км\ч а парохода-60 км\ч.догонит ли такси пароход в следующем порту который находится на расстоянии 120км от места отправления если известно что движение пассажир начал через 20 мин после отправления парохода ? в качестве реализации модели используйте pascal

Var v1,v2,dt,s:integer; t1,t2:real;
begin
v1:=100; v2:=60; dt:=20; s:=120;
t1:=s/v1*60;
t2:=s/v2*60;
if t1 <= t2+dt
 then writeln('Догонит')
 else writeln('Не догонит');
end.

Результат:
Догонит

А)
var    s:string;    mas:array ['a'..'z'] of longint;{индексы элементов соответствуют латинице}    c:char;    i:longint; begin      read(s);      for c:='a' to 'z' do{заполнение нулями элементов массива, для запоминания количества элементов в латинице}          mas[c]:=0;      for i:=1 to ord(s[0]) do{пробегаем по всей строке ord(s[0]) это количесвто элементов в строке (только паскаль)}          mas[s[i]]:=mas[s[i]]+1;      for c:='a' to 'z' do{пробегаем по массиву значений и выводим только неповторяющиеся}          if(mas[c]=1) then                       writeln(c); end.

Интернет – одно из самых удивительных изобретений 20-го века. Он дает безграничные возможности в отношении различных коммуникаций, получения и хранения нужной информации, направлении мультимедиа. Отношение к нему различных слоев населения неоднозначно, содержит даже диаметрально противоположные позиции, но огромное значение его в жизни современного человека не будет оспариваться никем.

Эта слайдовая презентация является результатом ученического исследования на тему влияния интернета на жизнь человека и на все общество в целом. На ее слайдах рассматриваются вопросы:

- Что же такое интернет,

- Использование интернета в жизни людей,

- Как интернет влияет на людей,

- Интернет для ребенка,

- Можем ли мы прожить без интернета,

- Интернет в отдельном школьном классе,

- Личное отношение автора к интернету.