В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
026k
026k
26.05.2022 23:36 •  Информатика

1. Скласти програму для обчислення виразу. 2. Використати мову програмування Python.
как можно скорее


1. Скласти програму для обчислення виразу. 2. Використати мову програмування Python. как можно скоре

Показать ответ
Ответ:
7534558
7534558
21.08.2021 06:26
Надо проанализировать высказывания самого работящего лжеца и честного жителя, получающего наибольшую (из честных островитян) зарплату (и одновременно работающего больше других честных жителей).Из высказывания № 1 самого высокооплачиваемого из честных островитян очевидно, что таких жителей — не больше 10 (говорящий это и 9 или меньше человек, которых он имел в виду). С другой стороны, если проанализировать высказывание № 1 самого работящего из лжецов, то на острове имеется минимум 10 человек, работающих больше него, и все они — честные (напомним, что он — лжец и его высказывание — ложное). Таким образом, на острове живут 10 честных жителей (n = 10).Из высказывания № 2 самого высокооплачиваемого из честных жителей следует, что на острове живут минимум 100 лжецов, из такого же высказывания самого низкооплачиваемого лжеца — что лжецов на острове — максимум 100. Следовательно, на острове живут 100 лжецов (m = 100).Итак, 100 жителей острова — лжецы, и 10 — честные люди (вот такой “странный” остров  :).
0,0(0 оценок)
Ответ:
W1LDOR
W1LDOR
02.06.2020 17:20
1.
var p:real; i:integer;
begin
write('цена 1 кг конфет = ');
readln(p);
for i:=1 to 10 do writeln(i,' кг - ',i*p:5:2);
end.

Пример:
цена 1 кг конфет = 125.50
1 кг - 125.50
2 кг - 251.00
3 кг - 376.50
4 кг - 502.00
5 кг - 627.50
6 кг - 753.00
7 кг - 878.50
8 кг - 1004.00
9 кг - 1129.50
10 кг - 1255.00

2.
var a,b,p,i:integer;
begin
write('a, b: ');
readln(a,b);
p:=1;
for i:=a to b do p:=p*i;
writeln('p = ',p);
end.

Пример:
a, b: 5 10
p = 151200

3.
var n,i:integer; s:real;
begin
write('n = ');
readln(n);
s:=0;
for i:=1 to n do s:=s+1/i;
writeln('s = ',s:8:3);
end.

Пример:
n =5
s = 2.283
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота