ошибка в коде

[sergio11]

вот первая задача

program dd;
const n=100;
var i,a:integer;
mas:array[1..n] of integer;
begin
writeln('Введите n');
readln(a);
writeln;
randomize;
for i:=1 to a do
mas[i]:=random(100);
for i:=1 to a do
writeln(mas[i]);
readln;
end.

[ROMA2PVT]

sergio11 не сказано что массив.

[sergio11]

ды уж понял. просто щас массивы изучать начал вот на автомате и отправил

[Pytnik]

спасибо большое. Вопрос, наверное глупый, но и всёже, почему Паскаль относят к программированию на Дельфи?

[ROMA2PVT]

http://ru.wikipedia.org/wiki/Delphi_...BD%D0%B8%D1%8F)

[Pytnik]

а как насчёт второго вопроса

[zumm]

Может так?

program str;
var
 s: string;
 i: integer;
begin
 writeln('Введите строку:');
 read(s);
 s:=s+' ';
 while s[i]<>' ' do
  inc(i);
 dec(i);
 writeln('Строка состоит из '+i+' символов');
 readln;
end.

Давно не писал на паскале. Но со строны делфи сто пудово рабит)

PS сори за косяки, если есть. побыстрому набросал...

[Pytnik]

zumm, ща попробую

[zumm]

отпишись, рабит код или нет) а том мне прям интересно))

[Pytnik]

Выкидывает ошибку Error 26: Type mismatch.