Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
k: integer; begin
read(k);
case k of
1..2,12: write('зима');
3..5: write ('весна');
6..8 : write ('лето');
9..11: write ('осень');
end; end.
а)400*2,5=1000кб
б)64: 2,5=25,6=25(страниц)
в)нужен диск cd-r ,cd-rw
Популярные вопросы