250 стр * 40строк*50симв=50 000 симв . 700*1024-50000/1024=.... столько останется свободного места
Var a,b,c:integer;
begin
writeln('Введите номер секунды');
readln(a);
b:=a div 3600;
c:=(a - 3600*b) div 60;
writeln(b,' ч ',c,' мин');
<span>end.</span>
Кои-8 - 1 символ = 8 бит
160 бит / 8 бит симв = 20 симв
1) 65
2) AB
3) 1000111.111
4) 740.6
5) F8.4