М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Colnre
Colnre
26.09.2020 15:03 •  Информатика

Pascal ! 1. составьте программу, вычисляющую, сколько букв надо исправить в слове х, чтобы получилось слово y (слова x и y одинаковой длины). 2. составьте программу, определения номера первой буквы "а" в слове х. 3. составьте программу, позволяющую выяснить, первая или последняя буква слова встречается в слове х чаще.

👇
Ответ:
DashaPol09
DashaPol09
26.09.2020
Задача 1.
var
  i,c: integer;
  x,y: string;

begin
  readln(x);
  readln(y);
  for i:=1 to length(x) do
    if x[i]<>y[i] then inc(c);
  writeln('Букв надо исправить = ',c)
end.

Задача 2.

var
  i: integer;
  x: string;

begin
  readln(x);  i:= 1;
  while x[i]<>'a' do inc(i);  // Здесь, в зависимости с какой буквой сравнивать, либо с русской, либо с англ.
  writeln(i)
end.
4,5(48 оценок)
Открыть все ответы
Ответ:
derver
derver
26.09.2020
1. Выполнить вручную шифрование сообщения при шифра «Поворотная решетка».

В качестве исходной фразы используйте:

Джинсы порезаны, лето, три полоски на кедах

2. Выполнить вручную шифрование сообщения при шифрующей системы Трисемуса.

В качестве исходной фразы используйте:

Под небом голубым есть город золотой

3. Выполнить вручную шифрование сообщения при лозунгового шифра.

В качестве исходной фразы используйте:

Я шагаю по пpoспектy, по ночномy гоpодy.

В качестве ключа используйте слово «Аквамарин»

4. Выполнить вручную шифрование сообщения при шифра табличной маршрутной перестановки.

В качестве исходной фразы используйте:

Я не знаю, где ошиблись мы в расчетах

5. Выполнить вручную кодирование сообщения методом RLE.

В качестве исходной фразы используйте:

РРппВ12уллл3336

6. Выполнить вручную кодирование сообщения методом RLE.

В качестве исходной фразы используйте:

еВпппВ11уфффуугггддд

7. Выполнить вручную кодирование сообщения методом RLE.

В качестве исходной фразы используйте:

ИВВВ111у

Заранее за ответы!

4,4(47 оценок)
Ответ:
snsn
snsn
26.09.2020
Const n=20;
var a: array[1..20] of integer = ( 20, 9, 24, 12, 23, 24, 21, 17, 1,
                  15, 25, 8, 21, 2, 6, 4, 12, 16, 8, 13);            
    i,j,k: integer;
begin
  for i:=1 to n-1 do
  for j:=i+1 to n do
  if a[j]<a[i] then swap(a[i],a[j]);
  writeln('отсортированный массив: ');
  for i:=1 to n do write(a[i],' ');
  writeln;
  k:=0;
  i:=1; j:=2;
  repeat
    if a[j]-a[i]>=3 then
    begin
      writeln('пара: ',a[i],' ',a[j]);    
      i:=j;
      inc(k);
    end;  
    inc(j);
  until j>n;
  writeln('количество солдат:k+1);
end.

отсортированный массив: 
1 2 4 6 8 8 9 12 12 13 15 16 17 20 21 21 23 24 24 25 
пара: 1 4
пара: 4 8
пара: 8 12
пара: 12 15
пара: 15 20
пара: 20 23
количество солдат: 7
4,7(15 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ