- 09.03.2018 04:28
- Информатика
- remove_red_eye 12349
- thumb_up 24
Ответы и объяснения 1
Var A,b,c,x,sum: integer; Y: real; Begin WriteLn('vvedite x');ReadLn(x); WriteLn('vvedite a');ReadLn(a); WriteLn('vvedite b');ReadLn(b); WriteLn('vvedite c');ReadLn(c); Sum:= a+b+c; If sum > 20 then begin Y:= 2*x-1; End else begin 3*sqr(x)*x-1; End; End.
- 01.01.1970 00:00
- thumb_up 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.