программа вычисления площади кольца, используя подпрограмму вычисления площади круга
10-11 класс
|
Код Pascal
1 const pi=3.14;
2 var n,m: real;
3 function S(r: real): real;
4begin
5 S:=pi*r*r;
6 end;
7begin
8write('R1='); readln(n); n:=S(n);
9write('R2='); readln(m); m:=S(m);
10writeln('S=',abs(n-m));
11end.
Другие вопросы из категории
какой коробки нужно взять,чтобы выяснить ,какие шарики лежат в каждой из коробок на самом деле?
неправильные ответы удаляю
Напишите, что такое маска подсети
Укажите правильную маску
255.0.0.1
255.255.125.0
255.255.255.0
255.255.253.128
три ответа :
1) Елена заняла первое место , а оля - второе .
2) Елена заняла второе место , а маша четвёртое .
3) катя заняла второе место , а Маша четвёртое .
отвечающие при этом признали , что одна часть каждого ответа верна , а друшая - не верна . какое место заняла каждая из учениц ?
Читайте также
Вычисление площади кольца
Введите исходные данные:
Радиус внешнего круга (см):
Радиус внутреннего круга (см):
Площадь внешнего круга:
Площадь внутреннего круга:
Площадь кольца:
процедурой и с функцией)
процедурой и с функцией)
результата введите ограничение на количество знаков после запятой. Примечание. В Паскале используются стандартные функции: SIN(X) - синус Х (аргумент задается в радианах); COS(X) - косинус Х (аргумент задается в радианах); Для подсчета угла в радианах используйте формулу: угол в радианах = (угол в градусах)*/180. Результат представьте в виде: Программа вычисления значений тригонометрических функций x° Sin(x) Cos(x) Tg(x) 1 2 3 .. 45