Получить ответ

Владимир 5.0 2 отзыва Рейтинг: 1 435 Общаться в чате read(a,b,c); d:=0; if a<0 then inc(d); if b<0 then inc(d); if c<0 then inc(d); writeln('Кол-во отрицательных чисел =',d);  {*****************************************} {Или так, более универсально:                                } {*****************************************} for i:=1 to 3 do begin read(a); if a<0 then inc(d); end; writeln(d); Добрый день. Меня заинтересовал ваш ответ "read(a,b,c);d:=0;if a<0 then inc(d);if b<0 then inc(d);if c<0 then inc(d);writeln('Кол-во о..." на вопрос http://www.liveexpert.org/topic/view/221483-rabota-v-paskale. Можно с вами обсудить этот ответ? Обсудить с экспертом 09.03.12

Еva 4.9 399 отзывов Рейтинг: 121 998 6-й в Учебе и науке Общаться в чате Читать ответы

Похожие вопросы