Вопрос по информатике:
Ввести 2 числа. Если оба числа равны 5.5, то выдать их на печать, иначе удвоить число не равное 5.5. Программу Паскаль пожалуйстааааааааааааа
- 04.08.2016 06:40
- Информатика
- remove_red_eye 14501
- thumb_up 12
Ответы и объяснения 1
Var x,y:real;
begin
readln(x,y);
if (x=y) and (x=5.5) then writeln('5.5 , 5.5')
else
if (xy) and (x5.5) then begin x:=x*2; writeln(x, ' , 5.5'); end;
if (xy) and (y5.5) then begin y:=y*2; writeln('5.5 , ', y); end;
end.
- 05.08.2016 16:37
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.