напишите решение задач 1. Майя, передала файл 8 Мбайт по каналу связи 512 Kbit/s. Сколько времени она - id1457183520210419 от linakn14 19.04.2021 02:59

Question

Информатика: напишите решение задач 1. Майя, передала файл 8 Мбайт по каналу связи 512 Kbit/s. Сколько времени она на это затратила? 2. Андрей, скачал файл за 8 минут 32 секунды, весом 256 Mbayt. С какой скоростью он качал файл? 3. Даша, скачала файл за 2 минуты 8 секунд. Сжала его и передал Ульяне за 16 секунд. Во сколько раз Даша сжала файл?

linakn14 · Accepted Answer

Var День,Месяц:byte; Begin Write( № дня = );ReadLn(День); Var C:=365-День; Write( № месяца = );ReadLn(Месяц); Case Месяц of 2:C:=C-31; 3:C:=C-59; 4:C:=C-90; 5:C:=C-120; 6:C:=C-151; 7:C:=C-181; 8:C:=C-212; 9:C:=C-243; 10:C:=C-273; 11:C:=C-304; 12:C:=C-334 End; if (C mod 100 10)and(C mod 100 20) then Write( До нового года осталось ,C, дней ) else Case C mod 10 of 1:Write( До нового года остался ,C, день ); 2..4:Write( До нового года осталось ,C, дня ); 0,5..9:Write( До нового года осталось ,C, дней...

MOGZ ответил