Составить программу для решения : "ввести число, обозначающее размер одной фотографии в мбайтах. определить, сколько фотографий поместится на флэш-карту объёмом 2 гбайта." язык программирования: pascal

1. с вещественными числами var   k: real; begin   write('размер фотографии, мб: '); read(k);   writeln('на flash-card объемом 2 гб поместится фото: ',       trunc(2*1024/k)) end. пример размер фотографии, мб: 3.27 на flash-card объемом 2 гб поместится фото: 626 2. с целыми числами var   k: integer; begin   write('размер фотографии, мб: '); read(k);   writeln('на flash-card объемом 2 гб поместится фото: ',2*1024 div k) end. пример размер фотографии, мб: 3 на flash-card объемом 2 гб поместится фото: 682

если 25(из которых 15 сто пудов в школьной и 10 смешанные) берут в школьной, то 10 человек берут в районной.

если 20(из которых 10 сто пудов берут в районной 10 смешанные), то 15 в школьной

получается 1) 10 человек; 2)15 человек; 3)10 чкловек; 4)10 чел; 5)15 чел.