Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 14.11.2015 16:49
- Информатика
- remove_red_eye 2666
- thumb_up 12
Ответы и объяснения 1
begin
writeln('Введите границы интервала для получения случайных значений:');
readln(d1,d2);
a:=(d2-d1)*random+d1;
b:=(d2-d1)*random+d1;
x:=(d2-d1)*random+d1;
writeln('a = ',a:5:2,' b = ',b:5:2,' x = ',x:5:2);
z:=ln(x*x+a*b);
k:=trunc(z) mod 7;
writeln('k = ',k);
case k of
0: writeln('воскресенье');
1: writeln('понедельник');
2: writeln('вторник');
3: writeln('среда');
4: writeln('четверг');
5: writeln('пятница');
6: writeln('суббота');
end;
end.
Пример:
Введите границы интервала для получения случайных значений:
2.1 9.4
a = 5.66 b = 4.93 x = 4.74
k = 3
среда
- 15.11.2015 13:18
- thumb_up 41
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.