Помогите найти ошибку плизuses crt; var a: array[1… 30] of integer; s,i,m,n: integer; beginclrscr; for i: =1 to 30…

Question

56

Помогите найти ошибку плизuses crt; var a: array[1… 30] of integer; s,i,m,n: integer; beginclrscr; for i: =1 to 30 dobegina[i]: =round (random*90-40); write (a[i]: 5); end; m: =a[1]; n: =1; for i: =1 to 30 doif a[i] в избранное ссылка

Знаете ответ?

happys · Accepted Answer

51

happys

25 февраля 2023

Не знаю какое было условие задачи, но я всего лишь добавила 1 строку и; в конце, т е то что я уже писала выше. Вроде все запустилось

комментировать

в избранное ссылка отблагодарить