- 04.02.2016 21:14
- Информатика
- remove_red_eye 7401
- thumb_up 32
Ответы и объяснения 2
var
x,y:real;
begin
Write('x='); Read(x);
if x>0 then y:=x*x
else y:=x+2;
Writeln('y=',y)
end.
- 05.02.2016 16:47
- thumb_up 33
y,x,z:real;
Begin
write('Введите x: ');
readln(x);
write('Введите у: ');
readln(y);
if x>0 then
z:=sqr(y)
else
z:=y+2;
Writeln('z=',z);
readln;
end.
- 06.02.2016 00:38
- thumb_up 24
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.