Публикую подробные результаты седьмого теста ОГЭ (щелкаем для увеличения картинки). Настоятельно рекомендую вдумчиво с ними ознакомиться и разобрать задания в которых допущены ошибки. Для этого открываю тест.
Очень жаль, что снова не так много решивших и ПРИСЛАВШИХ мне файл с заданием 19. Не принимала файлы с непонятно откуда взявшимся ответом. Мне важно было видеть ваш способ решения!
Снова публикую вариант решения задачи номер 20.2. Почему только Влад попробовал ее решить? У некоторых же с программированием все получалось!
Напишите программу для решения следующей задачи. Ученики 4 класса вели дневники наблюдения за погодой и ежедневно записывали дневную температуру. Найдите самую низкую температуру за время наблюдения. Если температура опускалась ниже –15 градусов, выведите YES, иначе выведите NO. Программа получает на вход количество дней, в течение которых проводилось измерение температуры N (1 ≤ N ≤ 31), затем для каждого дня вводится температура.
Возможный текст программы:С использованием массива
Program zadanie;
Var temp:array[1..31] of integer; k,i,n: integer;
Begin
k:=1000;
Write('Введите сколько дней записывалась температура: '); Readln(n);
For i:= 1 to y do Begin
Write('Запишите температуру ', i, ' дня: '); Readln(temp[i]);
if temp[i] < k then
k:=temp[i];
end;
Writeln('Минимальная температура дня: ',k);
if k<-15 then writeln('YES')
else writeln('NO')
End.
Без использования массива
var a, N, i, min, num : integer;
begin
min:=50; num:=0;
Write('Введите сколько дней записывалась температура: '); readln(N);
for i:=1 to N do begin
readln(a);
if a < min then min := a;
if a < –15 then num := 1;
end;
writeln(min);
if num > 0 tnen writeln(’YES’)
else writeln(’NO’)
end.
