Var a,b,c: integer;
begin
readln(a,b,c);
if (a=b)and(b=c) then writeln('Все числа равны')
else
begin
a:=a-5; b:=b-5; c:=c-5;
writeln('a = ',a,' b = ',b,' c = ',c);
end;
end.
Пример:
7 5 6
<span>a = 2 b = 0 c = 1</span>
Форумула нахождения объема файла по скорости и времени:
I = v*t, из этого следует что I = 2400000*1 = 2400000 бит.
После нахождения массы в битах, находим ее в магабайтах:
I = ((2400000/8)/1024)/1024 = ~0,29 МБ
Ответ: ~0,29 МБ
Содержание
Указатель
Поиск
Редактор какой нибудь газеты, бухгалтер, модератор, диспетчеры.
Иван занимается л.отлетикой Андрей-футболом Алексей-хоккеем Петр-баскетболом!