нуден код на языкаж
1- Фортран 4
2- Паскаль
строк 500, желательно арифметика, можер с псевдографикой, значения что сей код делает неважно, единственное условие чтоб он работал
PS необходим не для копипаста, а теста одной проги