Program words;
var
t: array [0..35] of string;
t2: array [0..1190] of string;
iskomoe: array [0..142614] of string;
s: byte;
s1: longint;
s2: integer; //1190
q: byte;
f1: file of char ;
begin
writeln('сколько символов вы собираетесь использовать? (до 35) ');
read(q);
assign(f1,'russ.txt');
reset(f1);
for s: =0 to q do
begin
readln(t[s]);
end ;
//тут нужно будет сделать новый массив со всеми комбинациями;
//допустим этот массив(массив есть в условиях - t2[s2]) с комбинациями описан выше ;
begin
for s1: =1 to 142614 do readln( f1 ,iskomoe[s1]); тут пишет что нельзя считывать данные этого типа и параметр цикла for в pascalabc.net должен описываться в заголовке цикла
s2: =0;
repeat
s2: =s2+1;
until t2[s2]=iskomoe;
close(f1);
writeln(t2[s2]);
end;
end.

119

128

Посмотреть ответы 1

Ответы на вопрос:

sasunaklukina

Информатика

4,6(98 оценок)

const nn=100; vara: array [1..nn] of real; i,n,k: integer; beginwrite('n= '); readln(n); for i: = 1 to n do readln(a[i]); i: =1; k: =0; while (k=0) and (i< n) do begin if a[i]> a[i+1] then k: =1; i: =i+1; end; if k=0 then writeln('последовательность возрастающая') else writeln('последовательность не возрастающая'); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.