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

Дана строка содержащая любые символы кроме букв. написать процедуру, которая заменит все малые латинские буквы на следующие по алфавиту. например из строки: a bc 83xz получим b cd 83ya. procedure zamena(var stroka: string); можно решить обычным языком(8класс) length,copy,deleted,insert,

👇
Ответ:
Утешитель
Утешитель
27.04.2022

procedure Zamena(var stroka: string);

var

 i: integer;

begin

 for i := 1 to length(stroka) do

 begin

   if stroka[i] in ['a'..'y'] then inc(stroka[i])  

   else  

   if stroka[i] = 'z' then stroka[i] := 'a'

 end;

end;

var

 s: string;

begin

 readln(s);

 zamena(s);

 Writeln(s);

end.


Не уверен в корректной компиляции на fpc, к примеру, напишите если будут проблемы.

4,4(17 оценок)
Открыть все ответы
Ответ:
afinaty4
afinaty4
27.04.2022

1) Документ - это письменное подтверждение какого-либо события или факта

2) Текстовый документ - это представленная на бумажном, электронном или ином материальном носителе информация в текстовой форме

3) Раздел, строка, страница(это не точно)

4) Рассказ, письмо, справочник

5) Раздел - это часть текста, разделы могут включать в себя подразделы.

6) Текст, таблицы, рисунки (зависит это от того, какого типа документ)

7) Удобство редактирования, лёгкость копирования, лёгкость передачи по сетям

8) Электронная книга - это компактное устройство, которое предназначено для отображения текстовой информации, представленной в электронном виде

9) В электронных книгах существует поиск по тексту

10) С текста человек может передать свои мысли, чувства и эмоции

4,7(12 оценок)
Ответ:
яна2754
яна2754
27.04.2022

Программа:

Pascal:

var

 arr: array of integer;

 n, i, sum: integer;

begin

 write('Количество учеников: '); readln(n);

 SetLength(arr, n);

 

 for i := 0 to n - 1 do begin

   arr[i] := random(2, 5);

   sum += arr[i];

 end;

 writeln('Оценки учеников в классе: ', arr);

 writeln('Средняя оценка: ', sum/n);

end.

Для начала выделяем память массиву целых чисел, после - регистрируем переменные, которые будем использовать далее. Запрашиваем кол-во учеников (это и будет размерностью массива), устанавливаем длину массива - введённое число n. Циклом проходима по элементам массива, устанавливаем рандомное значение от 2 до 5 и суммируем элементы. В конце выводим сам массив и высчитываем среднюю оценку как среднее арифметическое чисел.


Составить программу на языке Паскаль для решения следующей задачи: Дан одномерный массив. В массиве
4,4(73 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ