Var k,summa:integer;
begin
for k:= 15 to 90 do
if k mod 2 =0 then
summa:= summa + 2*k;
writeln(summa);
end.
Сущ.-кошка
несущ.-дерево,машина, яблоко
2) d
3) алгоритмическое описание процессов
4) эффективность
5) 1 - в 2 - г 3 - а 4 - б
6) 1 - в 2 - а 3 -г 4 - б
Например если это число 123456, то 2*4*6=48
7680 байт/1024=7,5 Кбайт,
75776 байт/1024= 74 Кбайт
700000 байт/1024=683,59 Кбайт
2Мбайта *1024=2048 Кбайт
400 Мбайт * 1024= 409600 Кбайт
5 Гбайт * 1024 =5120 Мбайт * 1024 = 5242880 Кбайт
300 Гбайт *1024 = 307200 Мбайт * 1024 = 314572800 Кбайт