Составить программу для решения : "ввести число, обозначающее размер одной фотографии в мбайтах. определить, сколько фотографий поместится на флэш-карту объёмом 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

пщояк 17 27 16 33 17

нщёп 15 27 7 17