(t - время передачи, I - объем данных, v - скорость передачи)
Дано:
t = 4 c
v = 256000 бит/с
I - ?
Решение:
бит
1024000.0 бит = 128000.0 байт = 125.0 Кбайт
Var a,b,y:integer;
begin
writeln('Введите 2 числа a и b'); readln(a,b);
if a=b
then y:=1
else if a>b
then y:=2
else y:=3;
writeln('y= ', y);
end.
Голливуд, в катологе Фантастика создали подкаталог голивуд и туда переместили трансформеры.doc
1) Невозможно ничего, разные типы данных
2) Сложение возможно, невозможно деление
3) Возможно
4) Невозможно деление на 0
Ответ: 3)
Function G(n:integer):integer;
begin
if n=1 then G:=1
else G:=G(n-1)*n
end;
begin
Writeln(G(5))
end.
Тестовый результат
120