Var s:string;
begin
for var i:=1000 to 9999 do
begin
s:=i.ToString;
if((strtoint(s[1])+strtoint(s[2])+strtoint(s[3])+strtoint(s[4]))<4)then write(i,' ');
end;
end.
А) 4*1024; 4*1024*8;
b) 8192/8; 8192/(8*1024)
d)8*1024*1024*8
На дискете обычно 1.4 Мб, на CD-диске - 700 Мб, на DVD - 4700 Мб.
Из второго можем сразу найти, что на флешке 2701.4 - 1.4 - 700 = 2000 Мб.
Планы, кончено, для каждой школы должны быть свои. Если взять для примера тот, что представлен в прилагаемом файле, то можно выделить следующие объекты:
кабинеты, лестницы, выход, запасные выходы, огнетушители, пожарные краны, телефон(ы), электрощит(ы) и др.
можно среда, элементраные действия, система команд, отказы ну и так далее