. В рабочем окне программы SketchUp впишите название инструментов:
​

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

program pr; vars,n: string; c: char; i: integer; beginwriteln('введите имя и фамилию в одной строке'); readln (s); i: =1; while s[i]< > ' ' do i: =i+1; n: =copy(s,1,i-1); writeln(n); readln; end.

2гбайта=2000000байт

2000000байт/400байт=5000текстовых файлов

2*3=6

512*128*6=393216

393216: 1024=384кб