======================================
• Задача: 2. Глухое и сквозное — это виды отверстий или нет?
======================================
' ' <> Здравствуйте, Paveilrr2002! <> ' '
======================================
• ответное Объяснение:
======================================
Скорее всего, правильным ответом будет считаться нет. Потому что глухое и сквозное — это виды отверстий, а не сверл.
======================================
Отвéрстия представляют собой углубления в деталях. Они могут быть сквозными и глухúми. Сквозные отверстия проходят через всю деталь насквозь. Но глухúе не выходят наружу, а только выполняются на определённую глубину. Подробнее об этом Вы можете увидеть на картинке ниже.
======================================
Но, а с другой стороны, глухие и сквозные — это ещё могут быть виды сверл. M-Type твердосплавные глухое и сквозные свёрла обладают чрезвычайно острыми режущими кромками и беспрецедентно долгим временем работы до заточки.
======================================
• Вывод:
Поэтому, здесь ответом будет либо «Точный ответ дать нельзя», либо «Нет, глухое и сквозное — это виды отверстий». Но Вы сами должны решать, какой выбрать лучше ответ.
======================================
• Дополнительная информация:
======================================
• Класс: Любой, но желательно старшие классы.
• Предмет: Механика.
• Тема: Какие бывают виды отверстий?
• Автор во Автор ответа: Маша.
======================================
' ' <> С уважением, Ваша Маша! <> ' '
p - произведение
s - сумма
i - цикловая переменная
1. Цикл с предусловием While
var
p, s, i : longint; [или integer]
begin
p := 1;
s := 0;
i := 101;
while i < 200 do
begin
if i mod 5 = 0 then
begin
p := p * i;
s := s + i;
end;
i := i + 1; [или ing(i)]
end;
writeln(p);
writeln(c)
end.
2. Цикл с постусловием Repeat
var
p, s, i : longint; [или integer]
begin
p := 1;
s := 0;
i := 101;
repeat
if i mod 5 = 0 then
begin
p := p * i;
s := s + i;
end;
i := i + 1; [или ing(i)]
until i >= 200;
writeln(p);
writeln(c)
end.
3. Цикл For
var
p, s, i : longint; [или integer]
begin
p := 1;
s := 0;
for i := 101 to 199 do
begin
if i mod 5 = 0 then
begin
p := p * i;
s := s + i;
end;
end;
writeln(p);
writeln(c)
end.
