Ответ:
<h2>
<em>2</em><em>0</em><em>0</em><em>0</em><em> </em><em>Кбайт</em></h2>
Объяснение:
<h3> Переведем минуты в секунды :2 мин = 120 с </h3>
<h3>5000 Кбайт — 2 мин </h3>
<h3>Х кбайт — 48 с </h3>
<h3>Х = 5000 * 48 / 120 = 2000 Кбайт</h3>
<h3>~•~•~•ZLOY_TIGROVSKIY~•~•~•</h3>
Ответ:
1
Объяснение:
Первая итерация выполняется в любом случае, остальные не подойдут под условие
Var
a,b,c,d:integer;
begin
writeln('Введите трехзначное число: ');readln(a);
b:= a div 100;
c:= a mod 100 div 10;
d:= a mod 10;
if (b mod 2 = 0)and(c mod 2 = 0)and(d mod 2 = 0)
then writeln('yes')
else writeln('no');
end.
Pascal:
var x,y:integer;
begin
readln (x,y);
if (x>0) and (y>0) then writeln ('Точка лежит в первой четверти');
if (x<0) and (y>0) then writeln ('Точка лежит во второй четверти');
if (x<0) and (y<0) then writeln ('Точка лежит в третьей четверти');
if (x>0) and (y<0) then writeln ('Точка лежит в четвертой четверти');
if (x=0) and (y=0) then writeln ('Точка лежит на пересечении осей') else
if x=0 then writeln ('Точка лежит на оси ординат') else if y=0 then writeln ('Точка лежит на оси абсцисс');
readln;
end.