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);
y:=3*x+1;
a:=1; b:=3;
f1(a,b);
writeln ('a=',a,'b=',b);
f2(a,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 найти все, которые можно представить в виде суммы квадратов двух натуральных чисел. (Определите процедуру, позволяющую распознавать полные квадраты).
Представьтесь*
Ваш комментарий*
