Задачи по информатике. Процедуры и функции.

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 найти все, которые можно представить в виде суммы квадратов двух натуральных чисел. (Определите процедуру, позволяющую распознавать полные квадраты).

 

 

Написать комментарий

*  

Защитный код
Обновить
→