собівартість виробництва шкільного костюма становить 500грн.Прибуток підприємства,що їх виробляє 50грн роздрібна ціна одного костюма в магазині, -650 грн.Визначте прибуток виробника і торговель надбавку магазину 6КЛАСС ПРЯМ СЕЙЧАС НАДО С МИНУТЫ НА МИНУТУ
206
468
Ответы на вопрос:
Объяснение:
//Pascal
var
A: array[1..5] of integer;
i: byte;
MAX: integer;
begin
writeln('Заполнение массива.');
for i := 1 to 5 do
begin
write('A[',i,'] = '); readln(A[i]);
end;
MAX := A[1];
for i := 1 to 5 do
begin
if A[i] > MAX then MAX := A[i];
write(A[i]:4);
end;
writeln;
writeln('Максимальный элемент в массиве = ', MAX);
readln;
end.
Популярно: Экономика
-
Niker0429.03.2023 22:16
-
Glambert22321.06.2022 08:38
-
ZzzGoshAzzZ06.08.2020 23:06
-
martinovvanya217.05.2020 04:00
-
aveiro130.03.2022 15:29
-
СергеЙ8900902164525.07.2022 17:39
-
зефирка3920.03.2020 12:41
-
eva27272708.10.2022 11:02
-
михас316.11.2020 12:38
-
nataljalevchen22.01.2021 08:48