Регистрация Спросить otvet5GPT
dalelodaryn
30.03.2020 19:16
Информатика
Есть ответ 👍

Такое: в класее 20 учеников написали диктант, нужно создать програму оторая вычислит количество 2,3,4,5 я написал вот но она покацывает ошибку среда програмирования pascal abc.net program n_0547847; var b, c, d, f, i: integer; var a: array [1..20] of integer; begin; randomize; a[i]: =random (5); if a[i]=2 then b: =a[i]; writeln('количество двоек =',b); if a[i]= 3 then c: =a[i]; writeln('количество троек =',c); if a[i]=4 then d: =a[i]; writeln('количество четверок =',d); if a[i]=5 then f: =a[i]; writeln('количество пятёрок =',f); end.

197
419
Посмотреть ответы 2

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

adel2006buko
adel2006buko
4,5(50 оценок)
Честно, не поняла ваш код вообще. почему нет цикла? предлагаю свое решение: 1)cначала заполняем массив случайными числами от 2 до 5 (включительно) 2)потом выводим его (для проверки) 3) потом считаем оценки. но сначала нужно обнулить переменные( в самом начале это делали), а то получится кака (: program n_0547847; var       b, c, d, f, i: integer;       a: array [1..20] of integer; begin; randomize; b: =0; c: =0; d: =0; f: =0; for i: =1 to 20 do begin     a[i]: =random(4)+2;       write(a[i],' ');   end;   writeln; for i: =1 to 20 do begin       if a[i]=2 then   b: =b+1;       if a[i]=3 then   c: =c+1;       if a[i]=4 then   d: =d+1;       if a[i]=5 then     f: =f+1; end; writeln('двоек: ',  b);   writeln('троек: ', c);   writeln('четверок: ',d); writeln('пятерок: ',f); end.   
ritababak
ritababak
4,7(80 оценок)

varmas: array[1..10]of integer; i: integer; beginfor i: =1 to 10 dobeginmas[i]: =i; mas[i]: =mas[i]*2; write (mas[i]: 3); end; end.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

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

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

  • Сколько это стоит?

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

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS