Помогите пожалуйста срочно нужно!

Question

Помогите пожалуйста срочно нужно! 1) программа для определения объема и площади поверхности шара. Вот формула если что S=4ПR²,V=¾ΠR² 2) программа проверяет является ли введенное число нечетным и при этом делится на 5 3) задача нахождения факториала числа ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО!

Answer 1

39

mityarko

26 февраля 2023

1) Program P1; Const pi=3,14; Var r,s,v: real; BeginWrite ('r='); Read (r); s: =4*pi*r*r; v: =3/4*pi*r*r; write ('S=', s, ' V=', v); End.2) Program P1; Var x: integer; Beginwrite ('x='); Readln (x); If (x mod 2=0) Then write ('число четное, ') Else write ('число нечетное, '); If (x mod 5=0) Then write ('делится на 5') Else write ('не делится на 5') End.P. S. Если напишешь, что такое факториал и по какой формуле считается, напишу и третью программу.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: