Ошибка: нельзя преобразовать тип real к integer

@Secret_Volga · Регистрация: 10.10.2016

Author24 — интернет-сервис помощи студентам

Создайте массив А[1..8] с помощью генератора случайных чисел с вещественными элементами от -10 до 10 и выведите его на экран. Отсортировать по возрастанию и вывести полученный массив на экран.... Я сделал массив вещественным, но дальше выбивает ошибку: нельзя преобразовать тип real к integer. В чем проблема найдите ошибку пожалуйста

Pascal

program laba11;                         
uses crt;
var 
 a:array[1..8]of real;
 i,b,buf:integer;
 begin
 clrscr;
 randomize;
 for i:= 1 to 8 do
begin 
a[i]:=random(21)-10;
   write(a[i],' ');
   end;
 for i:=1 to 8-1 do 
    for b:=i+1 to 8 do
    if a[i]>a[b] then 
    begin
     buf:=a[i]; 
    a[i]:=a[b]; 
    a[b]:=buf;
    end;
    writeln;
  writeln('Массив после сортировки пузырьковым методом: ');
  for i:=1 to 8 do 
    write(a[i],' ');
end.

@volvo · 09.11.2016, 16:10

Pascal

var 
 a:array[1..8]of real;
 i,b:integer;
 buf: real; // Переменная buf должна иметь тот же тип, что и элементы массива

	09.11.2016, 16:10