Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Помогите исправить ошибку в программе паскаль

Лисичка Влада Ученик (130), на голосовании 13 часов назад
Program p1;
Var c:Array [1..6] of real;
i:integer;
Begin
For i:= 1 to 6 do readln(c[i]);
For i:= 1 to 6 do write (c[i]:0:2);
End.

Runtime error 106 at $00000000004010CB
$00000000004010CB
$000000000040104F

Я если что, ну совсем в программировании чайник
Голосование за лучший ответ
Никита Шишлов Мастер (1020) 1 месяц назад
Program p1;
Var c:Array [1..6] of real;
i:integer;
Begin
// Инициализация массива с нулевыми значениями
for i := 1 to 6 do c[i] := 0.0;
For i:= 1 to 6 do readln(c[i]);
For i:= 1 to 6 do write (c[i]:0:2);
End.
Дима Идимадов Ученик (241) 1 месяц назад
Program p1;
Var
c: Array [1..6] of Real;
i: Integer;
Begin
// Запрашиваем ввод значений
WriteLn('Введите 6 разрядных чисел:');
For i := 1 to 6 do
ReadLn(c[i]);

// Вывод значений
WriteLn('Введённые числа:');
For i := 1 to 6 do
Write(c[i]:0:2, ' '); // добавил пробел между числами

WriteLn; // переход на новую строку в конце
End.
Gennady Гений (60628) 1 месяц назад
Ошибка 106 означает "неправильный числовой формат". Вы что используете для разделения целой и дробной части, не запятую, случайно? Попробуйте точку и обретете счастье.
Похожие вопросы