Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 13.09.2015 06:25
- Информатика
- remove_red_eye 14562
- thumb_up 22
Ответы и объяснения 1
program IfElse;
var
x, y: real;
begin
writeln (x,y);
read (x,y);
if x<=2
then y:=sqr(x)+4*x+5
else y:=cos(x)/(sqr(x)+4*x+5);
writeln ('y=', y);
readln;
end;
6
program IfElse;
var
x, y: real;
begin
writeln (x,y);
read (x,y);
if x<=0
then y:=0;
else if (x>0 and x<=1)
then y:=2*x*sin(x)
else y:=sqr(sqr(x));
writeln ('y=', y);
readln;
end;
- 14.09.2015 11:18
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.