Ответы на вопрос:
{допустим ,что масив будет вводитса с клавиатуры число символов 10 тип-integer}
program mas;
var m: array [1..10] of integer;
i,o,kp,pp,oo,a,b,s: integer;
begin
writeln ('vvedit masiv');
for i: =1 to 10 do begin
readln (m[i]); end;
o: =0;
for i: =1 to 10 do begin
if m[i]=0 then o: =o+1; end;
kp: =0
for i: =1 to 10 do begin
if m[i] div 5=5 then kp: =kp+1; end;
pp: =0;
for i: =1 to 5 do begin
pp: =pp+m[i]; end;
oo: =0;
for i: =1 to 10 do begin
if m[i]=0 then oo: =oo+1; end;
writeln ('vvedit a i b');
readln (a,b);
s: =0;
for i: =a to b do begin
s: =s+m[i]; end;
writeln ('kolichestvo 0 - ',o);
writeln ('suma kratna 5- ',kp);
writeln ('suma pervix 5- ',pp);
if oo=2 then writeln ('virno v masivi dva nuli') else
writeln ('v masive ne 2 nuli');
writeln ('suma ot a do b= ',s);
end.
{p.s. я не проверял в паскале если будут з нею проблемы то обращяйся}
{p.p.s. обрати внимание на разницу о и 0}
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
EvaMilka25.01.2023 03:03
-
yaooiojhh17.02.2022 07:54
-
хорошийпарень219.02.2021 06:32
-
000010103847362626117.03.2020 03:31
-
olgakankova8615.12.2021 05:32
-
vovareket30.06.2021 05:05
-
nugumanovsalavp092yo10.01.2020 18:43
-
Пиоооьлл25.06.2020 00:52
-
egor2002browhnq905.02.2023 05:32
-
JlunaJlove16.11.2021 17:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.