[ask43]

Сообщение от friz

я думаю это задача с первого курса, так что нечего парню голову морочить

Код:

var
v,t,n,s:integer;
g:real;
begin
......................
//тут вводятся данные
....................
s:=v*t*60; //скорость в секундах, а время в часах, поэтому *60, результат в битах.
g:=s/(8*1024*1024*1024);//результат в гб, *8-байты, *1024-кб,*1024-мб, *1024-гб
n:=g/(1024*1.4)// количество дискет

p.s. программа конечно требует улучшения, в частности надо отработать количество дискет, т.к. оно не может быть 23.45675 ... эта задача не сложная так что делай сам

спасибо большое за помощь))