Получите свидетельство
Вход
1. Для заданного х вычислите у по формуле у= х3 + 2,5х2– х + 1.
При этом:
а) операцию возведения в степень использовать запрещено;
б) в обном операторе присваивания можно использовать не более одной арифметической операции (сложение, умножение, вычитание);
в) в программе может быть использовано не более пяти операторов присваивания.
var x,y: real;
begin
write ('Введите x: ');
readln (x);
y := x + 2.5;
y := y * x;
y := y - 1;
y := y * x;
y := y - 1;
writeln ('y = ',y);
end.
2. По заданным координатам точек А и В вычислите длину отрезка АВ
Опечатка в исходных данных: xa=2, ya=1.
var
xa, ya, xb, yb: real; // Исходные данные
ab: real; // Результат
begin
write ('xa=');
readln (xa);
write ('ya=');
readln (ya);
write ('xb=');
readln (xb);
write ('yb=');
readln (yb);
ab := sqrt (sqr(xa-xb)+sqr (ya-yb));
writeln('|AB| = ', ab:4:1);
end.
Полную информацию смотрите в файле.
Практическая работа по информатике "Программирование линейных алгоритмов на компьютере" (3.48 MB)
1
8054
486
Нравится
0
