Я осмелился предположить, что вопрос в задаче состоял в нахождении максимально возможной частоты дискретизации (n), с которой звукозапись может поместиться в файл размером 5 Гб.
Дано:
I = 32 бит = 4 байта
V = 5 Гб * 1024 * 1024 * 1024 = 5 368 709 120 байт
t = 0.5 ч = 30 м * 60 = 1800 с
Найти:
n - ?
V = I*n*t (если запись в стерео, то еще умножить на два: V = I*n*t*2)
n = V / (I*t) (если запись в стерео, то: n = V / (I*t*2))
n = 5 368 709 120 байт / (4 байта * 1800 с) ≈ 745 654 Гц ≈ 745,7 кГц
ответ: 745,7 кГц
Var u1,u2,u3,u4,u5,otv1,otv2,otv3,otv4,otv5: Double; //ввод десятичных через точку
begin
writeln('Введите рост 1 в метрах');
readln(u1);
writeln('Введите рост 2 в метрах');
readln(u2);
writeln('Введите рост 3 в метрах');
readln(u3);
writeln('Введите рост 4 в метрах');
readln(u4);
writeln('Введите рост 5 в метрах');
readln(u5);
otv1 := u1*100;
otv2 := u2*100;
otv3 := u3*100;
otv4 := u4*100;
otv5 := u5*100;
writeln('ответ 1 ', otv1, 'см');
writeln('ответ 2 ', otv2, 'см');
writeln('ответ 3 ', otv3, 'см');
writeln('ответ 4 ', otv4, 'см');
writeln('ответ 5 ', otv5, 'см');
end.
2
4
Объяснение:
6 не пишется т.к. при этом условии цикл ломается.