Регистрация
yroyakap0doki
13.11.2020 23:24
Информатика
Есть ответ 👍

Меня заблокировали что делать​

221
414
Посмотреть ответы 2

Ответы на вопрос:

ruzruz258
ruzruz258
4,7(86 оценок)

Напиши об этом в службу поддержки, там тебе должны

Васелёк05
Васелёк05
4,4(2 оценок)
Var r,l,s,s2,v: real; begin write('введите радиус'); readln(r); l: = 2*pi*r; s: = pi*sqr(r); s2: = 4*pi*sqr(r); v: = 4/3*pi*(r*r*r); writeln('длина окружности равна=', l: 2: 2); writeln('площадь круга равна=', s: 2: 2); writeln('площадь поверхности шара равна=', s2: 2: 2); writeln('объём поверхности шара равен=', v: 2: 2); readln; end.

Популярно: Информатика