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

Программирование на языке Python, задача Гамбсовская мебель Захватило почему-то дух у Ипполита Матвеевича. Он отчетливо вспомнил гостиную в своем особняке, симметрично расставленную ореховую мебель с гнутыми ножками, начищенный восковой пол, старинный коричневый рояль и овальные черные рамочки с дагерротипами сановных родственников на стенах. И дюжину стульев, обитых английским ситцем в мелкий цветочек.

Однако не вся мебель одинаково дорога Ипполиту Матвеевичу, а только та, у которой больше 4 общих букв с заветным словом.

Напишите программу, которая из строки фраз, записанных через дефис, окруженный пробелами, выберет только подходящие.

ответ обязательно на языке Python, можно файлом.


Программирование на языке Python, задача Гамбсовская мебель Захватило почему-то дух у Ипполита Матве

Показать ответ
Ответ:
valovaliza2018
valovaliza2018
12.04.2023 17:25
В 3 пункте непонятно. "чему равна температура за первую половину сентября?"
Средняя температура? Половина сентября? в задаче и так прдставлен массив половины сентября - с 1 по 15 число.
uses crt;
const n=15;
var max,min,i,k:integer;
sr:real;
a:array[1..n] of integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(23)-4;
write(a[i]:3);
end;
writeln;
max:=-4;
for i:=1 to n do
if a[i]>max then
begin
max:=a[i];
k:=i;
end;
writeln('a)',k,' day ',max,'temperature');
min:=19;
for i:=1 to n do
if a[i]<min then
begin
min:=a[i];
k:=i;
end;
writeln('a)',k,' day ',min,'temperature');
sr:=0;
for i:=1 to n do
sr:=a[i]+sr;
sr:=sr/n;
writeln('средняя температура за половину сентября ',sr);
k:=0;
for i:=1 to n do
if a[i]<sr then begin inc(k); writeln(i,'сентября'); end;
writeln(k);
end.
0,0(0 оценок)
Ответ:
Ylija2002
Ylija2002
18.12.2022 10:11
1.

var
t,vk,vt: real;

begin
writeln('Введите скорость катера (vk) и скорость течения реки (vt) в км/ч: ');
read(vk,vt);
writeln('Введите время (t) в часах: ');
read(t);
writeln('Катер за ',t,'ч. пройдет ',t*(vk+vt),' км');
end.

2.

var
n,x: real;

begin
writeln('Введите кол-во кактусов: ');
read(x);
writeln('Сколько кактусов было побрито? ');
read(n);
if (x - n) < x/2 then writeln('Гладких кактусов больше.');
if (x - n) = x/2 then writeln('Небритых и гладких поровну.');
if (x - n) > x/2 then writeln('Небритых кактусов больше.');
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота