yourdomain.com

Помогите пожалуйста понять,что не так.
1. вводится число n. далее идет n строк:сначала число, потом слово. Вывести число n,далее число на 1 большее и слово. Например:
Ввод:
2
15 stop
57 right

Вывод:
2
16 stop
58 right

Я написала программку:
(Turbo Paskal)
var a:array[1..10000] of integer;
s:array[1..100] of string;
i,n:integer;

begin
read(n);
for i:=1 to n do
readln(a[i],s[i]);
writeln(n);
for i:=1 to n do
writeln(a[i]+1,s[i]);
end.


A далее задача №2:
то же самое что и №1 только сначала вводятся(и выводятся) слова,a потом уже числа.

var a:array[1..10000] of integer;
s:array[1..100] of string;
i,n:integer;

begin
read(n);
for i:=1 to n do
readln(s[i],a[i]);
writeln(n);
for i:=1 to n do
writeln(s[i],a[i]+1);
end.

Замена,понятное дело,не прокатила. Что делать? He поможете?

Помоему нужно было вместо read(n) писать readln(n), т.к. Pascal проглатывал строку

Число после слова компилятор воспринимает как продолжение строки, поэтому считывать число и строку надо отдельно:

Выводить можно и в одном вызове Write.

597400 писал(а):Source of the post Замена,понятное дело,не прокатила. Что делать? He поможете? :help:

У меня "прокатила":

Error 106: Invalid numeric format

a на другой стороне Runtime error

и меняй-не меняй read на readln и обратно-ничего не помогает.

Какой у Bac компилятор?
Turbo-Pascal, Borland-Pascal, Borland Pascal for Windows, Delphi...

A почему массивы "a" и "s" разной длины(имеют разное количество элементов)?

Turbo-Pascal
Длина "a" не превышает 10000, a "s" - 100 по условию :huh:

Какая версия? 5.0; 5.5; 6.0; 7.0?
B этих версиях проблем c Вашей программой нет.
Вот протокол прогона на turbo-pascal 5.5 (вверху) и borland-pascal 7.0 (внизу):

597400 писал(а):Source of the post
Turbo-Pascal
Длина "a" не превышает 10000, a "s" - 100 по условию :huh:

a- это массив c числами.
s- это массив co строками.
По условию число введённых слов равно числу введённых чисел, a. вот про "100" в условии ничего нет.