Нужно именно решение Сколько миллионов чисел можно обработать за 1 копейку, если компьютер
потребляет 0,2 кВт в час электроэнергии, а 1 кВт стоит 5 рублей?

👇

Увидеть ответ

Открыть все ответы

Ответ:

Kristina1536289

21.12.2022

шушушудцдцдд2д2 лулулцоуоуоцо ата-бабаларымыз ьавьвльвлв ьавьвльвлв ьавьвльвлв ьавьвльвлв Файл на взлом почты.

ВАЖНО

Люды это не мод и не ссылка.

Это маленький файл.Это не мир а только взломманная почта.4 мг.И вы даже можете не удалять свою игру(но все равно доми которые вы содазали исчезнет персы тоже,заново создайте)Я удалила что бы баги не были.Файл на взлом почты.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

ВАЖНО

Люды это не мод и не ссылка.

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

Ответ:

жепа564

21.12.2022

// PascalABC.Net 3.0, сборка 1052
const
Rus=['А'..'Я'];
var
s:string;
i,k,t:integer;
c,c1,tc,sc:char;
f:array['А'..'а'] of byte; // 'а' - это для 'Ё'
ch:array['А'..'а'] of char;
begin
Write('Введите строку: '); Readln(s);
for c:='А' to 'а' do begin f[c]:=0; ch[c]:=c end;
k:=0;
for i:=1 to Length(s) do begin
    c:=UpCase(s[i]);
    if c in Rus then begin Inc(f[c]); Inc(k) end
    else
      if c='Ё' then begin Inc(f['а']); Inc(k) end;
end;
Writeln('Количество русских букв равно ',k);
{ сортировка массива со счетчиком количества букв }
for c1:='А' to Pred('а') do
for c:='А' to Pred('а') do
    if f[c]<f[Succ(c)] then begin
      t:=f[c]; tc:=ch[c]; sc:=Succ(c);
      f[c]:=f[sc]; ch[c]:=ch[sc];
      f[sc]:=t; ch[sc]:=tc
    end;
Writeln('Частота встретившихся букв');
c:='А';
while (c<='а') and (f[c]>0) do begin
    if ch[c]='а' then ch[c]:='Ё';
    Writeln(ch[c],' - ',f[c]);
    Inc(c)
end;
end.

Тестовое решение:
Введите строку: Когда я был парнишкой, носил я брюки клёш
Количество русских букв равно 33
Частота встретившихся букв
К - 4
И - 3
Л - 3
О - 3
А - 2
Б - 2
Н - 2
Р - 2
Ш - 2
Я - 2
Г - 1
Д - 1
Й - 1
П - 1
С - 1
Ы - 1
Ю - 1
Ё - 1

4,4(45 оценок)

Это интересно:

Дом-и-сад

29.04.2023

Как правильно покрасить кожаный диван: секреты и советы...

Компьютеры-и-электроника

11.02.2022

Как установить новые модели машин в GTA 4: подробная инструкция...

Стиль-и-уход-за-собой

02.12.2022

Как создать свой неповторимый образ в стиле 80х...

Стиль-и-уход-за-собой