)заранее . на 5 класс. а) повесть из 270 страниц решили напечатать в трех номерах журнала, причем во - id153664320200107 от Хаурма7 07.01.2020 06:41

Question

Математика: )заранее . на 5 класс. а) повесть из 270 страниц решили напечатать в трех номерах журнала, причем во 2-ой номер поместили часть повести, в 1,1/2(1 целую 1/2-ую) раза большую, чем первый номер, а в третий- в 2 раза большую, чем в первый. сколько страниц повести было напечатано в каждом номере журнала? ( это на части) б)для показа собак соорудили трибуну, передняя стенка которой изображена на рисунке 207. вычислите площадь передней стенки трибуны и определите, сколько баночек с краской надо купить

Хаурма7 · Accepted Answer

1)
program one;
uses crt;
var A: array [1..6] of integer;
i,k,Amin,Amax,S: integer;
begin
readln (A[i]);
Amax:=A[1];
k:=1;
for i:=2 to 6 do begin
if A[i]>Amax then begin
k:=i;
Amax:=A[i];
end;
end;
Amin:=A[1];
k:=1;
for i:=2 to 6 do begin
if A[i]<Amin then begin
k:=i;
Amin:=A[i];
end;
end;
S:=0;
for i:=1 to 6 do begin
if (A[i]mod 2=0) and (Amax>A[i]) and (Amin<A[i]) then
S:=S+A[i];
end;
writeln ('Сумма положительных чисел между минимальным и максимальным значениями равна: ', S);
end.

2)
program two;
uses crt;
var x,a,b,i,n: integer;
y: real;
begin
readln (a,b,i,n);
x:=a;
repeat
if -2<=x<=2 then
y:=sqr(x)-1
else
y:=sqrt(x-1);
writeln (y:3:4);
i:=i+n;
until x>=b;
end.
1) дан массив а(6). найти сумму и количество положительных элементов, расположенных между минимальны

1) дан массив а(6). найти сумму и количество положительных элементов, расположенных между минимальны

MOGZ ответил