Имеется целочисленный массив, состоящий из 10 элементов, элементы вводятся с клавиатуры,найти разность а[9]и а[3] элементов
Имеется целочисленный массив, состоящий из 10 элементов, элементы вводятся с клавиатуры,найти разность а[9]и а[3] элементов
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы