Вопрос по информатике:
Ребята срочно нужна помощь. есть программа в pascal она звучит так: Ученики 4 класса вели дневники наблюдения за погодой и ежедневно записывали дневную температуру. Найдите самую низкую температуру за время наблюдения. Если температура опускалась ниже –15 градусов, выведите YES, иначе выведите NO. даны числа :4,-5,12,-2,8. не могу вывести -5. вот сама программа:
program z3;
var t, n, i: integer;
begin
writeln('Кол-во дней');
readln(n);
for i:=1 to n do
begin
write('Температура в ', i, ' день: ');
readln(t);
end;
if t < -15 then writeln('Yes')
else writeln('No');
end.
зарание спасибо!
- 26.08.2017 17:07
- Информатика
- remove_red_eye 16949
- thumb_up 32
Ответы и объяснения 1
Ты сделал условие вне цикла и тебе будет выдавать yes или no только за последний день.
program z3;
var t, n, d, i: integer;
begin
writeln('Кол-во дней');
readln(n);
for i:=1 to n do
begin
write('Температура в ', i, ' день: ');
readln(t);
if t < -15 then d:=d+1;
end;
if d > 0 then writeln('Yes')
else writeln('No');
end.
- 27.08.2017 14:31
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.