Имеется целочисленный массив, состоящий из 10 элементов, элементы вводятся с...

0 голосов
45 просмотров

Имеется целочисленный массив, состоящий из 10 элементов, элементы вводятся с клавиатуры,найти разность а[9]и а[3] элементов


Информатика (12 баллов) | 45 просмотров
Дан 1 ответ
0 голосов

Var a:array[1..10] of integer; i:integer;
begin
for i:=1 to 10 do read(a[i]);
writeln('Разность=',a[9]-a[3]);
end.