Определим размер изображения 2362*3543=8368566 пикс.
Определим информационный объём файла 3*8368566=25105698 байт. Переведён в более крупную единицу: 25105698/1024=24517,28Кбайт
Ещё в более крупную: 24517,28/1024=23,98Мбайт. Можно округлить и получим 24 Мбайт
Var a,b,c,d:integer;
beginwriteln('введите год');
readln(a);
if (a>=1730) and (a<=1914) then writeln('Санкт-Петербург');
if (a>=1915) and (a<=1924) then writeln('Петроград');
if (a>=1925) and (a<=1991) then writeln('Ленинград');
if (a>=1992) then writeln('<span>Санкт-Петербург</span>');
end.
Ответ:
могу сказать только сколько рядов.
480000÷50 = 9600(рядов)