Напишите, программы для pascal: 4. вывести на экран первые 4 степени числа . в качестве значения использовать встроенную константу языка. 5. дано число n. проверить истинность высказывания: "число n является точным квадратом".

192

332

Посмотреть ответы 2

Ответы на вопрос:

aleksandrakova4

Информатика

4,8(22 оценок)

Var i : integer; a : real; begin a : = 1; for i : = 1 to 4 do begin writeln ('pi^', i - 1, ' = ', a); a : = a * pi; end; end. var n : real; begin read (n); if trunc (sqrt (n)) = sqrt (n) then writeln ('yes') else writeln ('no'); end.

PO3TER

Информатика

4,7(10 оценок)

Для начала надо, i1 -(обьём файла) перевести из килобайт в байты и скорость соединения из бит в байты. i1=8кбайт×1024=8'192байт u1=2048÷8=256 байт u2=1440÷8=180 байт теперь, чтобы найти t(время), надо (i1÷u1) t=8'192÷256=32 сек. а чтобы найти i2 нужно i=t×u ; i=32×180=5'760 байт ответ: i2=5'760 p.s: знак (') я писал, чтобы легче было распознать число.