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

Надо решить сделать задание под номером 9

Показать ответ
Ответ:
mariacold
mariacold
24.05.2021 17:00
#include <iostream>
using namespace std;
int main()
{
setlocale(0,"");
int p;
int n;
int kol=0;
cout<<"введите число p которое проверяется";
cin>>p;
cout<<"введите число n первых нечётных чисел ";
cin>>n;
for (int i=1;i<=n*2;i++)
  {
  for (int j=1;j<=n*2;j++)
    {
    if ( ((i%2)==1) && ((j%2)==1) ) n2++;
    if ( ((i%2)==1) && ((j%2)==1) && ((i*j)==p) ) kol++; 
    }
  }
cout<<"количество "<<n<<" первых нечётных чисел кратных "<<p<<" = "<<kol;
return 0;
}
0,0(0 оценок)
Ответ:
zina111
zina111
28.07.2020 14:31
Var x,y,z: real;
      t: integer;
begin writeln('введите х и у');
          readln(x,y);
          z:=sqrt(sqr(x)-sqr(y));
          t:=0;
          while (z>0,1) do
          begin t:=t+1;
                    z:=0,98*z;    {если 2% от изменяющегося расстояния до пола;
                   если же имеется ввиду 2% от исходного расстояния,
                   то нужно будет ввести новую переменную
                   или присвоить исходное значение z, например х,
                   то есть сразу после z:=sqrt(sqr(x)-sqr(y)); написать x:=z;
                   Формула (оператор) z:=0,98*z;  изменится так:
                   z:=z-x*0,98}
           end;
          writeln('палка упадет через ', t,' мин.');
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота