Найти длину окружности L и площадь круга S заданного радиуса R: L = 2·π·R, S = π·R 2

+2
Ответы (1)
  1. 9 июля, 14:27
    0
    program zz1;

    var r, L, S: real; / / задаем переменные не целого типа

    begin

    write (' введите исходное значение радиуса окружности '); / / вводим с клавиатуры исходное значение r

    read (r);

    L:=2 * pi * r; / / вычисляем длину окружности

    writeln (' полученное значение длины окружности = ', L:5:2); / / выводим ответ в формате пять знаков для всего числа и два знака после запятой

    S: = pi * r * r; / / вычисляем площадь круга

    writeln (' полученное значение площади круга = ', S:5:2); / / выводим ответ

    end.
Знаешь ответ на этот вопрос?
Новые вопросы по информатике
в кодировке кои-8 каждый символ кодируется одним байтом. определите количество символов в сообщени, если информационный обьем сообщения в этой кодировке равен 120 бит.
Ответы (1)
1. Дано целое число, лежащее в диапазоне 1-999. Вывести его строку-описание вида "четное двузначное число","нечетное трехзначное число" и т. д. 2. Даны 3 переменные вещественного типа: А, В, С.
Ответы (1)
что такое графическая модель
Ответы (1)
Сколько всего было иероглифов в египетском письме?
Ответы (1)
Файл размером 6 Кбайт передается через некоторое соединнение 600 сек. Сколько секунд будет передаваться файл размером 6 Гбайт?
Ответы (1)
Напистаь программу удаления из строки чётных или нечётных чисел
Ответы (1)
Орган человека, воспринимающий вкусовую информацию 4 буквы
Ответы (1)
а) Выбери название действия, которое былс совершено при форматировании текста 1. ТЕКСТ 1 Декодирование - это восстановление информации по её кодированной форме ТЕКСТ 2 Декодирование - это восстановление информации по её кодированной форме ТЕКСТ 3
Ответы (1)
Скорость передачи данных через ADSL-соединение 128000 бит/с. Сколько времени займет передача файла объёмом 5 Мбайт по этому каналу? а) 328 б) 41 в) 5,5 г) 40
Ответы (1)
Если при наборе текста все буквы отображаются прописными то это означает что нажатие клавиша 1. Num Lock 2. Caps Lock 3. F1
Ответы (1)