|
1.
|
Даны координаты трех вершин треугольника. Найти дины всех его сторон.
|
2.
|
Что напечатает следующая программа:
program vlzl;
var a,b: integer;
procedure f1 (x,y: integer);
begin
y:=2*x+3;
end;
procedure f2 (var x,y: integer);
begin
y:=3*x+1;
end;
begin
a:=1; b:=3;
f1(a,b);
writeln ('a=',a,'b=',b);
f2(a,b);
writeln ('a=',a,'b=',b);
end.
|
|
3.
|
Используя процедуру решения квадратного уравнения, напишите программу решения биквадратного уравнения с коэффициентами a, b и c (a?0).
|
4.
|
Используя процедуру, вычислить значение выражения:
y = a1x4 + a2x3 + a3x2 + a4x + a5, где коэффициенты а1, a2, a3, a4, a5 и х – это числа, вводимые с клавиатуры.
|
|
5.
|
Составить программу нахождения наибольшего общего делителя нескольких чисел, например 3, используя функцию нахождения НОД двух чисел.
|
|
6.
|
Дано натуральное число N. Среди чисел 1, 2, 3, …., N найти все, которые можно представить в виде суммы квадратов двух натуральных чисел. (Определите процедуру, позволяющую распознавать полные квадраты).
|
|
|
