Var a,b:integer;
begin
readln(a);
readln(b);
writeln(abs(a-b));
end.
F1 = 6 Mбайт =2*3 *2^23 бит= 3*2^24 бит
V1=2^19 бит/с
V2=2^14 бит/с
F2=256=2^8 Кбайт=2^21 бит
------------------------------------------------
t1=2^21 :2^19 =2^2 =4 сек - время, за которое Толя скачает 256 Кбайт
t2=3*2^24 : 2^14 =3*2^10=3072 сек - Миша скачает все 6 Мбайт
t=t1+t2=4+3072=3076 cекунд - общее время ответ 3076
Человек встает из за стола и кидает в вора наручники и вяжет его в милицию
Var
a, b, s : Integer;
begin
Write('введите a= ');
readln(a);
Write('введите b= ');
readln(b);
S:=a+b;
if s<32767 then writeln(s) else writeln('произошло переполнение');
end.
#include <stdio.h>
#include <conio.h>
int main(){
int x=0, i;
for (int i=10; i<=99;i++)
{
if (i%7==0)
x++;
}
printf("%d",x);}