Просмотр поста

Jane

24 янв 2012 г., 19:06

Блиносвёрт ?

на псевдопаскале так:
мин: = а[1];
фор и=1 то 10 ду
бегин
иф а[и] < мин
мин: = а[и]
енд
иф мин мод 2 = 0 принт "четное" елс "нечетное"