Первая:
<span>var </span>
<span>q,a,b:real; </span>
<span>begin </span>
<span>read(a,b); </span>
<span>q:=sqrt(a*a+b*b); </span>
<span>writeln(q:2:2); </span>
<span>end. </span>
<span>Вторая: </span>
<span>var </span>
<span>a:integer; </span>
<span>begin </span>
<span>read(a); </span>
<span>writeln('The next number for the numder ',a,' is ',a+1); </span>
<span>write('The previaus number for the numder ',a,' is ',a-1); </span>
<span>end. </span>
Uses crt;
var
x,y,a,b:integer;
begin
clrscr;
while true do begin
randomize;
x:=random(10);
y:=random(10);
write('Введите первое число=');read(a);
write('Введите второе число=');read(b);
writeln(x,' ',y);
if ((a=x) and (b=y)) or ((a=y) and (b=x)) then begin
writeln('Вы угадали');
end
else begin
writeln('Вы не угадали');
end;
end;
end.
<span>
-Компьютер что мы о нем знаем.во первых компютер это машина которая помогает найти нам нужную информацию. Во вторых через компьютер мы общаемся с родственниками и друзьями . В третих компьютер можно назвать ученым изо того что именно он может ответить на любой вопрос . в четвёртых чкловек создал для компьютера игры которые можно скачивать . Компьютеры бывают разные мощные и скоростные . чем смогла тем помогла.
</span>
Дано двухзначное и трехзначное число. Найти квадрат суммы десятков этих чисел.
1 байт = 8 бит 1024 байта = 1 килобайт
1)3027:8=378,375 байтов - скорость
378,375:1024=0,3695068359375 килобайтов - скорость
60:0,3695068359375=162,3785926660059 секунд будет скачиваться 1 файл
2)162,3785926660059:256=0,6342913776015855(бит)-2 файл
3)0,6342913776015855:8:1024=7,742814667988105e-5(КилоБайтов)
Ответ файл весит 7,742814667988105e-5 килобайтов