1-в среде delphi определить наибольшее из трех чисел 2 процедура сохранения документа. 3 создание текстогого редактора

делфи - обьектно ориентированная среда программирования обжект паскаль. так что структурно паскалем там катит (работает из-под доса)1)vara,b,c,max,max2, max3: integer; beginwriteln ('vvedite chisla'); read (a); read (b); read (c); beginif (a> b) thenbeginmax: =a end; if (b> a) then begin max: =b end; if (c> max) thenbeginmax2: =c; end; if (max> max2) then max3: =max; if (max< max2) then max3: =max2; writeln (max3); end; end.

Так как скорость одинаковая, можно решить через пропорции:

Файл 2 Кбайт передаётся со скоростью 1024 бит/с.

Другой файл передаётся со скоростью 512 бит/с, то есть в 2 раза медленнее. Значит и передаваемый файл получится в 2 раза меньше. 2/2 = 1.

Или же можно решить так, пошагово вычисляя:

Файл1 = 2 Кбайт = 256*1024 байт.

Скорость1 = 1024 бит/с = 1024/8 байт/с.

Время1 = ? = Файл1/Скорость1 = = 16 с.

Время2 = Время1 = 16 с.

Скорость2 = 512 бит/с.

Файл2 = ? = Скорость2*Время2 = 512*16 бит = байт = 512*2 байт = Кбайт = 1 Кбайт.