PASCAL
program aa;
var a : integer;
begin
writeln('Введите день недели');
Read(a);
If (a < 1) or (a>7) then writeln('Такого дня не существует');
If (a > 0) and (a<6) then writeln('Рабочий день');
If a=4 then writeln(четверг');
end
1. var a, b :real;
begin readln(a, b); writeln(sqrt(a*a + b*b)); end.
2. var s1, s2, a1, a2 :real;
begin readln(s1, s2);
if s1 / 3.14159265 < s2 / 4 then writeln('yes') else writeln('no');
end.
3. var x, y :real;
begin readln(x);
if x < -10 then y:=234 - x*x*x else y:=x * x + 54;
writeln(y);
end.
Чебурашку:С новым годом малыш расти очень большой. Крокодила Гену:воспитывай малыша порядочно С новым годом.
Ясно, что канал АВ - медленный, поэтому передавать надо сначала
с А на С, а потом с С на В.
1260 МБ с компьютера А будут переданы на компьютер С за
1260/11 = 114,5 = 115 с.
,Но компьютер С начнет передавать на В информацию сразу, как только будет ее получать. За эти же 115 с будет передано
115*9 = 1035 МБ.
Остальные 1260 - 1035 = 225 МБ будут переданы еще за
225/9 = 25 с.
Итого на оба компьютера В и С информация будет передана за
115 + 25 = 140 с
Ответ: 140.
16 = 2⁴
Смотрим степень двойки - 4.
Ответ: 4 бита.