1. Программирование линейных алгоритмов
Записать на языке Паскаль программу линейного алгоритма, в которой для введенных с
клавиатуры буквы на экран выводится ее двоичный код.
2. Программирование разветвляющихся алгоритмов
Записать на языке Паскаль программу разветвляющегося алгоритма, в которой переменной У
присваивается значение большей из трех величин, А, В, С.
3. Программирование циклов с заданным числом повторений
Записать на языке Паскаль программу циклического алгоритма, в которой вычисляется
степень с натуральным показателем N для любого вещественного числа Х.

Uses graphABC;
begin
setwindowsize(600,500);
setbrushcolor(clMedGray);
Ellipse(320,30,490,400);
Ellipse(120,30,300,400);
setbrushcolor(clCream);
Ellipse(335,40,480,380);
Ellipse(140,40,280,380);
setbrushcolor(clMedGray);
Ellipse(100,430,500,130);
setbrushcolor(clNavy);
Ellipse(250,240,200,310);
Ellipse(350,240,400,310);
setbrushcolor(clwhite);
Ellipse(240,270,220,300);
Ellipse(360,270,380,300);

setbrushcolor(clblack);
Ellipse(270,330,330,370);
line(300,370,300,400);
Arc(300,280,120,220,-40);

line(50,350,200,350);
line(30,340,190,340);
line(10,330,180,330);

line(410,330,570,330);
line(400,340,560,340);
line(390,350,550,350);

line(240,230,220,150);
line(230,230,180,80);
line(220,230,180,150);

line(360,230,380,150);
line(370,230,430,80);
line(380,230,430,150);

end.
Эта

1. Записывает введенное пользователем значение в переменную dr
2. integer
3. sqrt(число)
4. var
5. 16
6. 2
7.
function x(a,b,c:integer);
begin
x:=-b+sqr(b)-sqr(4*a*c)*a;
end;
8. 11
9. end.
10. d)
11.
var a,b,c:integer;
result:real;
begin
readln(a,b,c);
result:=(a*b*c)/3;
writeln(result:0:3);
end.
12. real
13. оператор присвоения
14. Присвоить переменной F значение 125
15. write(B); или writeln(B);
16. корень из суммы квадрата х и ста делить на разность а и b умноженной на с
17. с)
18. Нет картинки как образован массив, значит сами решите
19. d)
20. c)
21. c)