Программа может выглядеть так:
program Func;
uses Crt;
var a,b: integer;
rez, fa, fb: integer;
begin ;
ClrScr;
a:=4;
b:=-5;
fa:=3*sqr(a)+4*a-5;
fb:=3*sqr(b)+4*b-5;
Rez:=fa+fb;
WriteLn('f(4)=', fa);
WriteLn('f(5)=', fb);
WriteLn('f(4)+f(5)=', Rez);
ReadLn;
end.
,
Python 3.6.3 (v3.6.3:2c5fed8, Oct 3 2017, 18:11:49) [MSC v.1900 64 bit (AMD64)] on win32
Type "copyright", "credits" or "license()" for more information.
>>> import numpy
>>> r=numpy.random.randint(100,size=10)
>>> print (r)
[35 17 87 61 5 10 91 89 14 81]
>>> numpy.roll(r,1)
array([81, 35, 17, 87, 61, 5, 10, 91, 89, 14])
>>>
Pascal
const
n = 15;
type
mas = array [1..n] of integer;
var
m : mas;
i : integer;
procedure inic (var a : mas);
var
i : integer;
begin
for i := 1 to n do
a[i] := 0;
end;
procedure num (var a : mas);
var
i : integer;
begin
for i := 1 to n do
a[i] := i;
end;
procedure w (var a : mas);
var
i : integer;
begin
for i := 1 to n do writeln (m[i]);
readln ();<span>
end;</span>
begin
inic (m);
num(m);
w(m);
end.
Время передачи файла размером 512Кб через некоторое соединение 2секунды. Найдите объем файла передающегося через это же соединение за 8 секунд. (ответ 2Мб)