Костя, рома и витя занимаются лыжами, футболом и боксом. рома не любит лыжи, а витя не занимается ни - id891935420210122 от bitievru2014 22.01.2021 05:04

Question

Информатика: Костя, рома и витя занимаются лыжами, футболом и боксом. рома не любит лыжи, а витя не занимается ни лыжами, ни боксом. какой спорт выбрал рома? футбол неизвестно бокс лыжи 2. костя будущий футболист лыжник неизвестно боксер 3. чем занимается витя? неизвестно футбол лыжи бокс

bitievru2014 · Accepted Answer

Вот задача для троечников с дополнительной оценкой: program pr1; uses crt; const arr1 : array[1..12] of integer = (5, 4, -3, 1, 0, -4, 0, 25, -8, 0, -17, -1); type arr2 = array of integer; var arr : arr2; n : integer; i, sot, spl, snu : byte; ch : char; begin write( Хотите использовать заданный по умолчанию массив? (y/n): ); ch := readkey; writeln(ch); sot := 0; spl := 0; snu := 0; if ((ch= y ) or (ch= Y )) then begin { Используем заданный по умолчанию } for i:=1 to 12 do begin if arr1[i] 0 then...

MOGZ ответил