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

Составить программу,определяющую какая буква слова x(первая или последняя) чаще встречается в слове y.

👇
Ответ:
yalunaluna
yalunaluna
05.06.2022
Var x,temp:string;
     first,last:char;
     k1,k2:integer;
begin
   write ('X = ');
   readln (x);
   k1:=0;
   k2:=0;
   first:=x[1];
   last:=x[length(x)];
   temp:=x;
   while (pos(first,temp)>0) do
    begin
      inc(k1);
      delete (temp,pos(first,temp),1);
    end;
   temp:=x;
   while (pos(last,temp)>0) do
    begin
      inc(k2);
      delete (temp,pos(last,temp),1);
    end;
   if (k1>k2) then writeln ('First') else
    if (k2>k1) then writeln ('Last') else
      writeln ('Equal');
end.
4,4(5 оценок)
Открыть все ответы
Ответ:
Hause1
Hause1
05.06.2022

1)128000  переводим в байты (128000  / 8 =  16000)

16000 переводим в килобайты (  16000 / 1024 =  15,625)

500килобайт делим на  15,625 получаем 32секунды.

2)512000  переводим в байты (512000  / 8 =  64000)

64000 переводим в килобайты (  64000 / 1024 =  62,5 )

62,5 умножаем на 46секунд, получаем  2875

3)128000  переводим в байты (128000  / 8 =  16000)

16000 переводим в килобайты (16000 / 1024 =  15,625)

1минуту 20сек переводим в секунды (60+20=80)

15,625 килобайт умножаем на 80секунд, получаем  1250килобайт

4,7(8 оценок)
Ответ:
Nastusha21032005
Nastusha21032005
05.06.2022

4. выделите текст цвет которого требуется изменить.на вкладке главная в группе шрифт щелкните стрелку рядом с элементом цвет шрифта а затем выберите цвет.для быстрого форматирования текста можно использовать мини-панель инструментов с параметрами форматирования.

5.выделите текст или ячейки с текстом которые нужно изменить чтобы выделить весь текст в документе word нажмите клавишу CTRL+A.на вкладке главная в поле размер шрифта выберите нужный размер шрифта.

6.форматирование текста изменение размера шрифта положение относительно страницы начертание курсив жирный обычной и т.д. основная цель повышение читаемости и наглядности текста

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