1. пешеход шел по пересеченной местности. его скорость движения по равнине v1 км/ч, в гору — v2 км/ч и под гору — v3 км/ч. время движения соответственно t1, t2 и t3 ч. написать программу определяющую, какой путь прошел пешеход? 2. написать программу, вычисляющую путь, пройденный лодкой, если ее скорость в стоячей воде v км/ч, скорость течения реки v1 км/ч, время движения по озеру t1 ч, а против течения реки – t2 ч.

163

313

Посмотреть ответы 2

Ответы на вопрос:

лоххз

Информатика

4,4(59 оценок)

program program1; vars,v1,v2,v3,t1,t2,t3: real; beginwrite('введите скорость движения по равнине: '); readln(v1); write('введите скорость движения в гору: '); readln(v2); write('введите скорость движения под гору: '); readln(v3); write('введите время движения по равнине: '); readln(t1); write('введите время движения в гору: '); readln(t2); write('введите время движения под гору: '); readln(t3); s: =t1*v1+t2*v2+t3*v3; writeln('путь = ',s); end.

program program2; vars,v,v1,t1,t2: real; beginwrite('введите скорость лодки в стоячей воде: '); readln(v); write('введите скорость течения реки: '); readln(v1); write('введите время движения по озеру: '); readln(t1); write('введите время движения против течения реки: '); readln(t2); s: =t1*v+t2*(v-v1); writeln('путь = ',s); end.

АрикаКуцыстова

Информатика

4,6(100 оценок)

Pascalabc.net 1) const n = 10; var a : array [1..n] of integer; i : integer; begin randomize; for i : = 1 to n do begin a[i] : = 22 + random(114); if a[i] > 100 then writeln (a[i]); end; end.2) var a,n,r,i : integer; begin r : = 1; readln (a,n); for i : = 1 to n do r : = r * a; writeln (r); end.3) var n,i,r : integer; begin r : = 1; readln (n); for i : = 1 to n do r : = r *i; writeln (r); end.4) var i : integer; begin for i : = 192 to 223 do write(chr(i); ,' '); end.5) var i : integer; begin for i : = 255 downto 240 do write (chr(i),' '); writeln(); for i : = 239 downto 224 do write (chr(i),' '); end.7) var i : integer; begin for i : = 122 downto 97 do writeln(chr(i)); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.