Разметка представляет собой процесс нанесения на обрабатываемую заготовку рисунка, определяющего контур детали и места обработки. Разметочные инструменты: измерительные линейки, угольники, чертилки, циркули, кернеры, молотки, центроискатели, штангенциркули, рейсмусы.
Объяснение:
Спасибо
Ответ дал: Гость
program xxx;
var i, n : integer;
s : real;
a : array [1..20] of real;
begin
writeln('введите размерность массива n=');
readln(n);
write('введите элементы массива а: ');
for i: =1 to n do
readln(a[i]);
writeln('исходный массив а: ');
for i: =1 to n do
writeln(a[i]);
s: =0;
for i: =1 to n do
if a[i]> 0 then s: =s+a[i];
writeln('сумма положительных элементов =', s);
readln
end.
Ответ дал: Гость
program xxx;
var i, n, s, k : integer;
a : array [1..20] of integer;
begin
write('введите n=');
readln(n)
writeln('введите элементы массива а: ' );
for i: =1 to n do
readln(a[i]);
s: =0;
k: =0;
for i: =1 to n do
if a[i] mod 8 = 0 then begin s: =s+a[i]; k: =1 end;
Популярные вопросы