Регистрация
YanaNiki
10.02.2022 01:17
Информатика
Есть ответ 👍

Определить кто проедет меньший путь и на сколько. автомобилист со скоростью 80 км/ч за k часов или мотоциклист со скоростью 70 км/ч за p часов.

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

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

zzubaidulloieva
zzubaidulloieva
4,6(22 оценок)

автомобилист !

lirazelio
lirazelio
4,5(21 оценок)
Var a: array[1..10,1..10] of integer; i, j, j1, max, s: integer; begin for i: =1 to 10 do for j: =1 to 10 do readln(a[i,j]); max : = a[1,1]; for i: =1 to 10 do for j: =1 to 10 do if a[i,j]> max then begin max : = a[i,j]; j1: =j; end; for i: =1 to 10 do begin s: =a[i, 1]; a[i, 1] : = a[i, j1]; a[i, j1] : = s; end; end.

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