1.Створіть програму для обчислення довжини кола та площі круга за введеним радіусом. (Використати функцію pi модуля math) 2. Створіть програму для обчислення площі круга за введеним діаметром. (Використати функцію pi модуля math) 3. Створіть програму для обчислення радіуса кола за введеною довжиною колаВикористати функцію pi модуля math) 4. Створіть програму для обчислення діаметра кола за введеною площею круга.(Використати функції pi та sqrt модуля math) 5. Створіть програму для обчислення довжини гіпотенузи прямокутного трикутника, за введеними катетами. (Використати функцію hypt модуля math) 6. Створіть програму для обчислення довжини катета прямокутного трикутника, за введеними катетом та гіпотенузою. (Використати функції sqrt та pow модуля math)
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Вклассе 111100(двоичная система)%девочек и 1100(двоичная) мальчиков. сколько учеников в классе?
Автор: Zelinskaya-Andrei
Найдите значение сложных высказываний, если известно, что А=0, В=1 и С=1
Автор: OlgaVasilevna
Определите тип данных в таблице ниже
Автор: dmitrievanata83538
Какова основная функция датчика цвета?
Автор: Bolshakova Shigorina
Типы обратной связи в информатике
Автор: Ляпунов_Владмирович
begin
case ReadInteger('Номер месяца (1-12):') of
1,2,12:Writeln('Зима');
3..5:Writeln('Весна');
6..8:Writeln('Лето');
9..11:Writeln('Осень');
else Writeln('Неверный номер месяца')
end
end.
Вариант "для школьников"
// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
var n:integer;
begin
Write('Номер месяца (1-12): '); Read(n);
case n of
1,2,12:Writeln('Зима');
3..5:Writeln('Весна');
6..8:Writeln('Лето');
9..11:Writeln('Осень');
else Writeln('Неверный номер месяца')
end
end.