Сергеевна-Пузанов
?>

Написать программу в паскале для вычисления формулы объема шара v=4/3пr3 (четыре третьих пи эр в кубе)

Информатика

Ответы

ElenaSkvortsova2
// PascalABC.NET 3.2, сборка 1385 от 14.02.2017

begin
  var r:=ReadReal('R =');
  Writeln('Vшара = ',4/3*Pi*r*r*r:0:4)
end.

Пример
R = 12.6
Vшара = 8379.1554
elenarumack

Уровень - Анализ

a) 1 байт = 8 бит = 2^3 бит

б) 213 бит = 0,026 Кбайт

в) 1 Мбайт = 1024 Кбайт = 2^20 байт = 2^23 бит

г) 1,5 Кбайт = 1536 байт = 12288 бит

Уровень - Синтез

a) 1 Мбайт = 2^10 Кбайт = 1048576 байт

б) 1 Гбайт = 2^10 Мбайт= 2^20 Кбайт

в) 2 Тбайт = 2048 Гбайт = 2^21 Мбайт

г) 1,5 Гбайт = 1536 Мбайт = 1572864 Кбайт

Объяснение:

1 байт = 8 бит

1 Кбайт = 1024 байт = 2^10 байт

1 Мбайт = 1024 Кбайт = 2^10 Кбайт

1 Гбайт = 1024 Мбайт = 2^10 Мбайт

1 Тбайт = 1024 Гбайт = 2^10 Гбайт

12288 бит / 8 = 1536 байт

1536 байт / 1024 = 1,5 Кбайт

2 Тбайт * 1024 = 2048 Гбайт = 2^11 Гбайт

2^11 Гбайт * 2^10 = 2^21 Мбайт

Svetlana191

1:

a = int(input())  

b = int(input())

if a == b:

   print('Числа равны')

elif a > b:

   print(f'Первое число - {a} больше, чем второе число - {b})

elif a < b:

  print(f'Второе число - {b} больше, чем первое число - {a}')

2:

a = int(input())  

b = int(input())

print('Периметр треугольника', a * 3)

print('Периметр квадрата', b * 4)

if a * 3 == b * 4:

   print('Периметры равны')

elif a * 3 > b * 4:

   print('Периметр треугольника больше, чем периметр квадрата')

elif a * 3 < b * 4:

   print('Периметр квадрата больше, чем периметр треугольника')

3:

a = int(input())  

b = int(input())

c = int(input())

print('MAX=', max(a, b, c), sep='')

4:

m = int(input())

t = int(input())

if m > t:

   print('У Маринки больше яблок. Тарасу нужно дать ещё', m - t, 'ябл.')

elif m < t:

  print('У Тараса больше яблок. Маринке нужно дать ещё', t - m, 'ябл.')

elif m == t:

   print('Количество яблок равно.')

Объяснение:

извини, украинский не знаю, думаю сам изменишь, если нужно

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программу в паскале для вычисления формулы объема шара v=4/3пr3 (четыре третьих пи эр в кубе)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kalterbrun
vladexi
Джамалутдинова Докучаев
nchalov2
Avdeeva Yelizaveta
TrubnikovKlimenok926
Lolira64
kolyabelousow4059
kirik197308
maestro6838
Константиновна
adman7
Джулия
terehin863
aleksagrbec39