Const
n = 5;
type
mas = array[1..n] of integer
var
max : integer;
begin
max := 0;
for i:=1 to n do
if (max < mas[i]) and (mas[i] mod 5 = 0) then max := mas[i];
writeln(max);
end.
Скорость передачи умножаем на время и делим на 16
4096*10=40960
406960/16=2560
Ответ: 2560
11 тройчное число рад был помочь
Задача 1 Нарисовать увеличивающие квадраты
Задача 2 Нарисовать вложенные квадраты