Загадка с циклом for-in loop при вводе в массив значений из консол - Pascal

  1. Здравствуйте! При создании массива из 30 элементов с типом String и при последующем, входе в цикл for-in loop для ввода значений из консоли в массив c[], ввод сразу же прекращается. Испробовал различные варианты написания, но результат тот же.

textual

Код:

var c:array [1..30] of string;
    i,n:integer;
begin
repeat
write('Введите размер массива от 1 до 30 n=');
readln(n);
until n in [1..30];
writeln('Введите ',n,' названий городов');
for i:=1 to n do
 begin
  write('Город ',i,': ');
  readln(c[i]);
 end;
writeln('Список городов');
for i:=1 to n do
writeln(c[i])
end.

Похожие ответы
  1. Тут такая тема: у нас дан массив из n чисел. Надо создать массив, в который будут входить числа с чётными индексами (из первго массива). Как решить задачку - это мне ясно. Но может есть какой ни будь другой способ, кроме того что бы просто делить n на 2 а потом создавать новй массив, и с помощю for i:=1 to n/2 do...? Блин, даже сформулировать вопросс правельно не смог! Ну надеюсь суть вам ясна?

  1. 1.Ввести масив записів, який містить призвіще та екзаменаційні оцінки. Створити новий масив, що містить прізвіще, та розмір стипендії, залежно від здачі сесії. Якщо стипендія не призначається, поле повинно бути пустим.2. Створити два файли даних з полями прізвище та ціна за деяку послугу. Якщо прізвища повторюються, то просумувати ціну послуг, переписати дані в вихідний файл..3.Створити текстовий файл, який містить, цілі числа. Переписати ці числа в вихідний файл в двійковому коді. вообщем, вот такая у меня проблема которую я сам неуспею решить наряду с другими. Прошу вашей помощи, сам буду помогать пока, что в других темах! Удачи всЕм!)

  1. Для заданои квадратнои матрицы сформировать одномерныи массив из ее диаголальных элементов. Наити след матрицы, суммируя элементы одномерного массива. Матрицу ввести с клавиатуры.

  1. Помогите, пожалуйста, доработать алгоритм. Задача такова: "Переставить в обратном порядке положительные элементы вещественного массива из 10 компонент".

  1. Написать программу для вывода на экран степеней (от 1 до 10) числа

  1. Создать модуль, выводящий таблицу умножения, таблицу квадратов чисел.

  1. люди добрые! помогите, пожалуйста, с задачей, что то туплю дико Найти сумму элементов первой строки матрицы и произведение элементов второй строки матрица а 4.5 -8.2 3.4 -5.1 6.9 -9.1 3.8 -4.3 1.9

  1. Подскажите правильно ли я написал программу для цикла "For" Условие в вложение..


Нашли ошибку?
Развитие проекта
Яндекс.Метрика