помогите решить пожалуйста. по паскалю 1. а) вычисления значения функции у = 7х2 - 3х + 6 при любом значении х;
10-11 класс
|
б) вычисления значения функции х = 12а2 + 7а — 16 при любом значении а.
2.
даны катеты прямоугольного треугольника. Найти его гипотенузу
1.
a)
var
y,x:real;
begin
read(x);
y:=7*sqr(x) - 3*x +6;
writeln(y);
end.
б)
var
y,a:real;
begin
read(a);
y:=12*sqr(a) + 7*a - 16;
writeln(y);
end.
2.
var
b,a,g:real;
begin
readln(a);
readln(b);
g:=sqrt(a*a + b*b);
writeln(g);
end.
Другие вопросы из категории
четыре целых числа, одно из которых отлично от трех других, равных между собой.
Вывести порядковый номер этого числа
получить от 5 до 15 баллов (Сгенерить случайные числа
Читайте также
1. модифицируйте предыдущий пример, так чтобы программа определяла максимальный и минимальный элемент массива
2. Напишите программу, которая бы определяла среднее арифметическое значение элементов массива (вещественная величина типа real)
Начало:
var a: array[1..10] of integer;
i: integer;
begin
а как дальше?
Предыдущий пример:
var a: array[1..10] of integer;
i: integer;
begin
randomize;
for i:=1 to 10 do
begina[i]:=random(40)-20;
end;
for i:=1write(a[i]:4);
end.
использования. Пример: Введите число: 100 сумма = 5050
"5":
Составить функцию, которая определяет, сколько зерен попросил положить на N-ую клетку изобретатель шахмат (на 1-ую – 1 зерно, на 2-ую – 2 зерна, на 3-ю – 4 зерна, …) Пример: Введите номер клетки: 28 На 28-ой клетке 134217728 зерен.