Переведите в байты : а) 28 Мбайт б) Кбайт
1 ответ:
Читайте также
// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
var r1,r2,r3:real;
Write('Введите R1 R2 R3: '); Read(r1,r2,r3);
var g:=1/r1+1/r2+1/r3;
Writeln('R=',1/g:0:5)
end.
<u><em>Тестовое решение:</em></u>
Введите R1 R2 R3: 3.5 2.75 4
R=1.11191