Код Pascal:
Var
P:byte;
Begin
Write('Введите рост человека: ');ReadLn(P);
if P > 180 then WriteLn('Высокий')
else WriteLn('Не очень высокий')
End.
Пример работы программы:
Введите рост человека: 150
Не очень высокий
X1 = int(input())
y1 = int(input())
x2 = int(input())
y2 = int(input())
if x1*x2>0 and y1*y2>0:
print("YES")
else:
print("NO")
Пример:
3
3
5
1
YES
1 МБит = 1 000 000 бит / с
2 МБит = 2 000 000 бит / c
Объем данных = скорость * время =
2 000 000 * 4 сек = 8 000 000 бит
8 000 000 / 8 = 1 000 000 байт
1 000 000 / 1024 = 976,5625 Кбайт
Таблицу покажи а то так невыполнить
Прабел ставится между словами