1)файл размером 950 кбайт передается через некоторое соединение в течение 40 секунд. определите размер файла (в кбайт), который можно передать через это соединение за 12 секунд. в ответе укажите одно число-размер файла в кбайт. единицы измерения писать не нужно. 2)файл размером 7 мбайт передается через некоторое соединение в течение 40 секунд. определите размер файла (в кбайт), который можно передать через это соединение за 15 секунд.

Номер 1:
1) 950 Кбайт ÷ 40 с = 23,75 Кбайт/с (скорость передачи файла)
2) 23,75 Кбайт/с × 12 с = 285 Кбайт
ответ: 285

номер 2:
1) 7 Мбайт = 7168 Кбайт
2) 7168 Кбайт ÷ 40 с = 179,2 Кбайт/с (скорость передачи файла)
3) 179,2 Кбайт/с × 15 с = 2688 Кбайт
ответ: 2688

{pascal, консольный ввод}

var
    velichina_vklada, srok_vklada, godovaya_procentnaya_stavka: integer;
    vklad_s_procentami: real;
   
    vklad_s_procentami_rub, vklad_s_procentami_kop: integer;
    dohod_rub, dohod_kop: integer;
   
begin
    write('Величина вклада (р.) - ');
    readln();
    write('Срок вклада (дней) - ');
    readln(srok_vklada);
    write('Годовая процентная ставка (%) - ');
    readln(godovaya_procentnaya_stavka);
   
    vklad_s_procentami := velichina_vklada * ((real(100) + real(godovaya_procentnaya_stavka)*real(srok_vklada)/365)/100);
    dohod_rub := (velichina_vklada - integer(vklad_s_procentami));
    dohod_kop := (velichina_vklada*100 - integer(vklad_s_procentami*100)) mod 100;
   
    vklad_s_procentami_rub := integer(vklad_s_procentami);
    vklad_s_procentami_kop := integer((vklad_s_procentami*100)) mod 100;
   
    writeln('Доход: ', dohod_rub,' р. ', dohod_kop, ' 80 коп.');
    writeln('Сумма по окончании срока вклада: ', vklad_s_procentami_rub, ' р. ', vklad_s_procentami_kop, ' коп.');
end.

Я не экономист и не экстрасенс, так что если именно сама формула подсчета дохода неверна - меняйте сами, я ее просто нашла в интернете.

var
vklad, dohod, summa, stavka: real;
srok: integer;
begin
write('Величина вклада (р.) - ');
readln(vklad);
write('Срок вклада (дней) - ');
readln(srok);
write('Годовая процентная ставка (%) - ');
readln(stavka);
dohod := (vklad*stavka)/(100*365) * srok;
summa := vklad + dohod;
writeln('Доход: ', Trunc(dohod), ' р.', frac(dohod)*100:3:0, ' коп.');
writeln('Сумма по окончании срока вклада: ', Trunc(summa), ' р.', Frac(summa)*100:3:0, ' коп.');
end.