информатика

Помогите пож с инфой задание 1 Найти ошибки в программе, реализующей вывод на экран элементов одномерного массива равных 0: Program mas1; Var a=array[1..10] Integer; For k:=1 to 10 Do  If b[k]<>0 Writeln(k); Readln; End. Задание 2 Какие из приведенных описаний одномерных массивов не являются правильными и почему: А) var a:Array[1..20] of Integer;  Б) var B:myarray;  B) var dd:array[1] of Integer; Г) var sd:array [5..30] of integer;  Д) var mas=array[1..50] of Integer;

Оставить ответ
1

Ответ №1

Program mas1;
Var a:array[1..10] of Integer; k:integer;
begin
{ Здесь еще должен быть ввод элементов массива }
For k:=1 to 10 Do
If a[k]<>0 then Writeln(k);
Readln;
End.

Задание 2
Б) нет размерности массива [...]
В) должна быть описана граничная пара [a..b]
Д) Вместо = должно быть :

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