![Geal](https://sproshu.net/uploads/ava/1/ava4769.jpg)
посчитайте , очень 35 поинтов 1) Написать программу на языке Паскаль вычисления выражения:S = 4f^2-√25+12m №2 Написать программу на языке Паскаль вычисления выражения. В ответе должно быть не только число, но и подпись кто выполнил.V = (2z^2-13)/(5h-10)+|n-25|
![Vladimir](https://sproshu.net/uploads/ava/3/ava5368.jpg)
~~~~~~~~~~
1)
begin
var (f, m) := readinteger2;
var s := 4 * sqr(f) - sqrt(25) + 12 * m;
write(s);
end.
~~~~~~~~~~
2)
begin
var (z, h, n) := readinteger3;
var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25);
write(v);
writeln('Выполнил: ВАШЕ ФИО');
end.
~~~~~~~~~~
~~~~~~~~~~
sqr(x) - возводит число х в квадрат;
sqrt(x) - вычисляет квадратный корень из числа x;
abs(x) - вычисляет модуль числа х.
~~~~~~~~~~
1)
begin // Начало программы
var (f, m) := readinteger2; // Считываем с клавиатуры значения f и m
var s := 4 * sqr(f) - sqrt(25) + 12 * m; // Вычисляем выражение
write(s); // Выводим
end. // Конец программы
~~~~~~~~~~
2)
begin // Начало программы
var (z, h, n) := readinteger3; // Считываем с клавиатуры значения z, h и n.
var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25); // Вычисляем выражение
write(v); // Выводим
writeln('Выполнил: ВАШЕ ФИО'); // Здесь вводите свое ФИО
end. // Конец программы
~~~~~~~~~~