изобразите схему дружественных связей участников туристической секции на основании информации представленной в этой таблице

267

464

Посмотреть ответы 1

Ответы на вопрос:

danyymamaev

Информатика

4,6(23 оценок)

Program vasil ; var n , m : integer ; begin write ( 'vvedi chislo bochek n=' ) ; readln ( n ) ; m : = n mod 10 ; if ( m = 1 and n < > 11 ) then writeln ( n , ' bochka' ) else if (m < = 4 and n < > 12 and n < > 13 and n < > 14 and m < > 0) then writeln ( n , ' bochki' ) else writeln ( n , ' bochek' ) ; end. так, наверное. если будет косяк, то пиши, или сам сообрази где ошибка. сейчас нет под рукой компилятора, не могу оттестировать.