В зависимости от значения температуры выдать сообщение: «температура повышена», «температура понижена»

19.06.2013, 19:36. **Показов** 8062. **Ответов** 2

Author24 — интернет-сервис помощи студентам

4. Ввести число А, означающее температуру человека. В зависимости от значения температуры выдать сообщение: «температура повышена», «температура понижена», «нормальная температура тела», «ошибка данных».

Pascal

Program Temperatura;
 var x: real;
 begin
  writeln('Введите температуру');
  readln(x);
  if x>34 and x<36.6 then
   begin
   writeln ('Температура нормальная);
   end
  else
   if x<34 and x>32 then
    begin
    writeln ('Температура понижена');
    end
   else
    if x>36.6 and x<42 then
    begin
    writeln('Температура повышена');
    end
   else
    writeln('Ошибка ввода');
   end
  end.

@ermolay · 19.06.2013, 20:43

Сообщение от na1exandr

Не могу понять что сделал не так

1. если условий 2 и больше - их нужно заключать в скобки
2. забыли закрыть строку в восьмой строке (сорри за тавтологию)
3. лишние begin end; (но это не ошибка)

Pascal

Program Temperatura;
var x: real;
begin
  writeln('Ââåäèòå òåìïåðàòóðó');
  readln(x);
  if (x>34) and (x<36.6) then
    writeln ('Òåìïåðàòóðà íîðìàëüíàÿ')
  else
  if (x<34) and (x>32) then
    writeln ('Òåìïåðàòóðà ïîíèæåíà')
  else
  if (x>36.6) and (x<42) then
    writeln('Òåìïåðàòóðà ïîâûøåíà')
  else
    writeln('Îøèáêà ââîäà');
end.

19.06.2013, 21:12

Спасибо за подробное обьяснение

na1exandr
	19.06.2013, 21:12	3
	Спасибо за подробное обьяснение