Http-протокол (поставь спасибо плиииииииииииииз!(╥_╥)
var
a:array[1..10] of integer;
i,b:integer;
begin
randomize;
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
b:=a[i]*a[10];
write(b);
end.
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var x:=ReadReal('x=');
if x>0 then Writeln('y=',x*(x+2))
else
if x<0 then Writeln('y=',x*(2*x-0.5))
else Writeln('Функция y(x) не определена при х=0')
end.
"В шести литрах 6000 миллилитров."
в этой строке 32 символа (с пробелами и точками). Каждый из них кодируется 16ю битами, значит всего будет
16 * 32 = 512 бита
Ответ. Информационный объем сообщения равен 512 бит
1) Автомобиль приехал по трассе S километров за t часов. Написать программу, которая определит среднюю скорость его движения. S, t - веществ. числа, вводятся с клавиатуры. Протокол работы программы должен выглядеть примерно так:
ВВедите расстояние(км.)-120
Введите время движения(час.)-1.2
Автомобиль двигался со скоростью 100 км/час[/B]
2)Напишите программу для обмена значениями двух целых переменных. Дополнительные переменные использовать нельзя. Если вы используете переменные X, Y, то других переменных в программе быть не должно.. протокол программы должен быть таким:
ВВедите два целых числа: 3 -5
на входе: Х=3, У=-5
на выходе Х=-5 ,У=3
3) Напишите программу циклического сдвига трех целых переменных по схеме X-> Y, Y-> Z, Z-> X..
В программе может быть использована одна дополнительная переменная. Протокол работы :
Введите три целых числа: 3 -5 7
На входе х=3, у=-5, z=7
На выходе х=7, у=3, z=-5