Голем лишнее. Потому что это персонаж мифологии, а остальные это города в разных уголках.
В одном гигабайте 1024 килобайтов,в одном килобайте 1024 байтов.
.............................................
var
i, p,
w:real;
begin
writeln('Введите
зарплату Иванова');
readln(i);
writeln('Введите
зарплату Петрова');
readln(p);
if i>p
then
writeln
('Иванов заработал больше Петрова') else
writeln
('Петров заработал больше Иванова');
w:=(i+p)/2;
writeln
('Средняя зарплата мальчиков ', w,
' руб.');
<span>end.</span>
Изображение таблицы - в прилагаемом файле.
Формулы имеют вид:
для столбца C: =3*(A1^3+B1^3)
для столбца D: =2*(A1^2-B1^2)