Вопрос по информатике:
Напишите программу.Даны три действительных числа. Возвести в квадрат те из них, значения которых неотрицательны, и в четвертую степень — отрицательные.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.08.2017 05:09
- Информатика
- remove_red_eye 9211
- thumb_up 15
Ответы и объяснения 2
begin
for var i := 1 to 3 do
begin
read(mas[i]);
if mas[i] >= 0 then mas[i] := sqr(mas[i])
else mas[i] := sqr(mas[i]) * sqr(mas[i]);
end.
- 16.08.2017 02:14
- thumb_up 45
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqReal(3).Select(x->x<0?sqr(x*x):x*x).Println
end.
Пример
3.18 -5.722 1.94
10.1124 1071.99167796866 3.7636
- 18.08.2017 00:30
- thumb_up 21
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.