Var
sum, x : integer;
begin
sum := 0;
repeat
read (x);
if (x mod 6 = 0) and (x mod 10 = 2) then sum := sum + x;
until x = 0;
write (sum);
end.
Program old;
var
s: real;
y: integer;
begin
s:=20;
y:=1626;
writeln('Сейчас 1626 год и я положил в банк: ', s);
while y<2003 do
begin
s:=(s+(s*0.04));
y:=(y+1);
writeln(s,'$ В банке на ', y, ' год');
end;
end.
Итого: 52795743.6290571$ В банке на 2003 год
1 файл в котором содержится текстовая информация 2 текстовый процессор имеет больше возможностей для форматирования текста, а так одно и тоже. 3 ввод текста, редактирование текста, форматирование текста, печать текста . 4 избегать ошибок и ставить пробелы после знаков препинания. 5 можно изменить размер, шрифт, атрибуты. 6 нажми на колесико и тащи мышку вверх или вниз, он будет летать.7 форматирование текста- приведение массива букв в читаемый вид. Текстовый редактор должен иметь инструмент для обработки текста.
1.
1)1 = 3*1024*8/3072 = 8 бит объем одного символа
2) N = 2^8 = 256 символов в алфавите
2
1)Так как N=64=2^6, то I = 6 бит
2) 7200*8/6 = 9600 символов в тексте
<span>3) 9600/4/40 = 60 символов в строке </span>