Используя цикл «для», создайте алгоритм и начертите блок-схему для решения задач: а) Найдите значение факториала n! Факториалом числа n (обозначается n!) называется произведение 1*2*3*4*…*n. б) Найти сумму квадратов чисел от 1 до 4. в) Найти сумму квадратов n целых чисел(n≥1) Нужны именно блок схемы!

1. Для цикла For

var
  x,n,p:longint;
  i:integer;
begin
  readln (x,n);
  p:=1;
  for i := 1 to N do
    p:=p*x;
  writeln(x,' в степени ',n,' равно ',p );
end.

2. Для цикла While
var
  x,n,p:longint;
  i:integer;
begin
  readln (x,n);
  p:=1;
  i:=1;
  while i<=n do begin
    p:=p*x;
    i:=i+1;
  end;
  writeln(x,' в степени ',n,' равно ',p );
end.

3. Для цикла Repeat

var
  x,n,p:longint;
  i:integer;
begin
  readln (x,n);
  p:=1;
  i:=1;
  repeat
    p:=p*x;
    i:=i+1;
  until i>n;
  writeln(x,' в степени ',n,' равно ',p );
end.

1.a) Из объектов
2.b) Растровое изображение
3. c) Увеличить растровое изображение
4. c) Теряются мелкие детали
5.b) Векторный
6. a) Точка
7. c) От яркости цветов на изображении
8.a) Количество цветов в палитре
9.b) Microsoft Paintc) Adobe Photoshop
10.b) Изменение размера происходит без потери качества
11.b) Растровое изображение
12.c) RGB модель
13.a) принтерe) дисплейf) графопостроитель (плоттер)
14.b) Corel Draw
15.b) растровой графики.
16.c) зеленый
17.a) JPEG  c) GIF  d) TIF  e) PNG  f) BMP  h) PCD
18.b) 256
19.a) HSB
20.b) частота дискретизации