заберите меня с инфы я ничего не понимаю я просто хочу пиццу и мороженое из макдональдса заберите я буду вас целовать

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
taskarin02
09.08.2021 09:42

// Простая программа на C++, вычисляющая произведение всех натуральных чисел из отрезка [N,M], где N и M - натуральные числа

#include <iostream>

#include <string>

using namespace std;

int main()

{

int N, M, product, i;

cout << "Введите натуральное число N" << endl;

cin >> N;

cout << "Введите натуральное число M, M >= N" << endl;

cin >> M;

if (N > M) { throw std::invalid_argument("M должно быть больше или равно N"); }

product = N;

for(i = N + 1; i <= M; i++) { product = product * i;}

cout << "Произведение натуральных чисел из отрезка [N,M]:" << endl;

cout << product << endl;

}

0,0(0 оценок)
Ответ:
настя200336
10.12.2021 13:37
Const n=20;
var a:array[1..n]of integer;
i,b,k,c,f,g,h:integer;
begin
for i:=1 to n do a[i]:=Random(70)-20;
for i:=1 to n do
write(a[i],' ');
writeln;
for i:=1 to n do begin
if (a[i] mod 5 = 0) and (a[i] mod 10<>0) or (a[i]=50) then begin
b:=i;
for b:=i to (n-1) do
a[i]:=a[i+1];
end; end;
for i:=1 to n do
write(a[i],' ');
write('введите к ');
read(k);
for i:=1 to n do begin
if a[i] mod i = 0 then begin
c:=i;
for i:=n downto c+1 do begin
a[i]:=a[i-1];
a[c+1]:=k;
end;end;end;
for i:=1 to n do
write(a[i],' ');
writeln;
f:=0; g:=0;
for i:=n downto 1 do begin
if (a[i]>0) then f:=i;
end;
if a[f]=0 then write('нет положительных ');
for i:=n downto 1 do begin
if (a[i]<0) then g:=i;
end;
if (a[g]=0) then write('нет отрицательных ');
if (a[f]<>0) and (a[g]<>0) then begin
h:=a[f]; a[f]:=a[g]; a[g]:=h; end;
for i:=1 to n do
write(a[i],' ');
writeln;
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота