Pascal нужно написать программу с алгоритмом 3.1 и 3.2 , 6
10-11 класс
|
Нужно очень очень. Подробно если можно
3.1
var
x, a, b, c: real;
begin
readln(x, a, b, c);
writeln('y = ', (sqr(a - 4) * (1 / (x * x * x)) - 3 * sqr(b) * x) / (a * x + b) + 3 * (1 / sqr(a)) - ln(x));
end.
3.2
var
a, h, b, c: real;
begin
readln(a, h);
c := 2 * sqrt(sqr(a) - sqr(h));
b := a;
writeln('P = ', a + b + c);
writeln('S = ', 0.5 * sqr(a));
end.
6
var
n, t: byte;
g: integer;
begin
readln(n);
for i: byte := 1 to n do
begin
readln(t);
g := g + t;
end;
writeln(g / n:0:1, ' г.');
end.
Другие вопросы из категории
связи, эквивалентный оптическому по пропускной способности?
Читайте также
13.
Нужно написать программу на цикле с предусловием, на Паскале.
оказаться)
нужно написать программу на c++
Используя обращения 1) по индексу и 2) по указателю.
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
Написать программу для нахождения среднего арифметического модулей двух чисел.
число рядов. Написать программу подсчета мест в кинотеатре «Оскар», в соответствии со схемой кинотеатра, представленной ниже. На экран вывести итоговое количество мест.(вложение - 1 рисунок)
Программа 6. Найти значение выражения для вводимых с клавиатуры А, В и С. при А=4, В=2, С=5.(вложение - формула)
Программа 7. Написать программу, вычисляющую значения логического выражения . На экран вывести это значение.
Программа 8. Пользователь вводит число 0,515625. Написать программу, которая в точности повторяет алгоритм перевода данного числа из десятичной системы счисления в четверичную. На экран вывести окончательный результат.