Program sorevnovanie; war n, i, r: integer; a: array [1.. 100] of integer; begin writelen ('программа определения победителя в соревнованиях по броскам мяча в корзину. выведите количество участников'] readln (n); for i: =1 to n do begin write ('результат участника №', i, ': '); readln (a[i]); end; r: =1; for i: =2 to n do if a[i]> a[r] then r: =i; write ('победил участник под номером ', r); почему программа abc net пишет: "встерчено 'var', а ожидалось begin

161

370

Ответы на вопрос:

4,4(81 оценок)

program sorevnovanie;

var

n, i, r: integer;

a: array [1.. 100] of integer;

begin

writeln ('программа определения победителя в соревнованиях по броскам мяча в корзину. выведите количество участников');

readln (n);

for i: =1 to n do

begin

write ('результат участника №', i, ': ');

readln (a[i]);

end;

r: =1;

for i: =2 to n do

if a[i]> a[r]

then r: =i;

write ('победил участник под номером ', r);

end.

может потому что она не правильно написана, попробуй вот так

4,7(23 оценок)

1)128=2^7 для хранения цвета надо 7 бит v=2048*2048*7/8=3670016 байта=3584 кбайта=3,5 мбайта 2) 3072*8=4096*x x=6 бит число цветов=2^6=64 цвета

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.