Есть ответ 👍

Сканируется цветное несжатое изображение размером 15 х 15 см. Разрешающая сканера - 600 х 600 dpi, глубина цвета - 4 байта. Какой информационный объём будет иметь полученный графический файл? Дано обязательно !!!

Дано | Решение

118
176
Посмотреть ответы 1

Ответы на вопрос:

HoneyAmy
4,8(11 оценок)

1)var s,i,n,a: integer;

begin

  a: =1;

  s: =1;

  readln(n);

  for i: =1 to n do

    begin

      s: =s*sqr(a);

      a: =a+1;

    end;

  writeln(s);

end.

2)var a,i: integer;

          x: real;

begin

  a: =0;

  readln(x);

  repeat

  a: =a+2;

  if power(a,3)> x then writeln(a);

  until power(a,3)> x;

end.

 

Популярно: Информатика