Исправьте ошибки: Program massiv; Var a:array(-10..10) of integer; Begin For i:=1 to 20 Do Read(a[i]); For i:=1 to 20 Do a[i]:=a[i]/10; For i:=1 to 20 Do Write(a[i]) End. 2.
чтобы работало? как исправить, что исправить. конкретнее
как описывается массив, как вводятся и выводятся элементы массива 3. переписать задачу в тетрадь сначала как она приведена здесь, а потом исправив ошибки:
Ответ:
Объяснение:
Во вложении
это точно то?
дааа
уже исправлено, там где не правильно дано, я переправила
верить или нет вам решать, я все делаю на совесть
хорошо,спасибо!
Пожалуйста