Помогите с информатикой!Программа Паскаль free
5-9 класс
|
var a, b, c, s, k, y: real;
begin
read(a, b, c);
s := sqrt(a + sqr(b) * b) / sqrt(c);
k := sqrt(abs(a * b - sqr(c) * c)) + s / (2 * a);
y := 3 * s * k - s / (b + a);
writeln(y);
end.
Другие вопросы из категории
монеты. В качестве ответа запишите число.
едневно для одного класса, сочтоящего из N учеников
1) дан массив А(8)
-6.4;5.6; -0.1;46.7;7;-3.8;0.23;6
а) сформировать массив В , каждый элемент которого вычисляется по формуле В(I) = A(I)*5
вывести на печать элементы массива В
В) вычеслить произведение масивов А и В
С) вывести на печать пятый элемент массива А и первый элемент массива В.
задание - все три заднтя объединить в один алгоритм.
---------
2) ввести четырехзначное число. есть ли в нем одинаковые цифры?
Читайте также
кратных k.(1 <(или равно) n<(или равно)4).
v1, v2, v3..., vn литров, пустой сосуд и кран с водой. Можно ли с помощью этих банок налить в сосуд ровно v литров воды.(Ответ должен выдаваться да или нет) Решение: обозначим s:=nod(v1, v2, v3..., vn) Если v делится нацело на s, то в сосуд с помощью банок можно налить v литров воды, иначе нет.Напишите программу пожалуйста,срочно и полностью, я вообще её не могу понять,помогите!!! :)