б)программа для создания и редактирования рисунков
3) Наборы структур данных, используемых для управления файлами
Program asd;
Uses crt;
Var x,a:integer;
begin
For x:=1 to 10 do
begin
a:=sqr(sqrt(x)+sqrt(x));
writeln (a);
end;
end.
2.
Program asd;
Uses crt;
Var x:integer;
Begin
For x:=20 to 50 do
if x mod 10=6
then writeln (x);
end.
785*3 - ответ будет в битах
785*3/8 - ответ в байтах
785*3/8/1024 - ответ в КБайтах
Ответ примерно равен 0.29КБайтам.
Если в 8-ми символьном алфавите для одного символа используется 3 бит информации.
Ответ: 2355бит или 294,375байт или 0.29КБайт
var i,p,o:integer;
a:array [1..30] of integer;