РЕБЯТ СРОЧНО ПОМОГИТЕ СДЕЛАТЬ ЛАБОРАТОРНУЮ ПО ИНФОРМАТИКЕ. ПОЖАЛУЙСТА. ОТДАЮ ВСЕ СВОИ ПНК
10-11 класс
|
Vladabdurashit
06 янв. 2014 г., 16:21:53 (10 лет назад)
Abndst
06 янв. 2014 г., 17:32:24 (10 лет назад)
var
x, y: real;
begin
readln(x);
if (x < 0) then
y := sin(x) / cos(x)
else
if (x <= 1) then
y := sqr(e)
else
y := x + cos(x);
writeln(y);
end.
Ответить
Другие вопросы из категории
перевести в биты:
12кб;28мб;7 гб;3тб
в мб:
10240бит ;248кб; 512гб; 24тб
За четверть ученик получил 100 оценок. Сообщение о том, что онполучил пятерку, несет 2 бита информации. Сколько пятерок ученик получил за четверть?
Желательно подробно.
Читайте также
Задача по информатике (Паскаль)
Пожалуйста помогите сделать задание в паскале.
Дана
матрица А(3.3)
1)
Вы находитесь на странице вопроса "РЕБЯТ СРОЧНО ПОМОГИТЕ СДЕЛАТЬ ЛАБОРАТОРНУЮ ПО ИНФОРМАТИКЕ. ПОЖАЛУЙСТА. ОТДАЮ ВСЕ СВОИ ПНК", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.