:напишите программу, заменяющую все большие символы в заданной строке на маленькие. и определите код символа, встречающийся наибольшее количество раз. например: 'наш город', код символа 'о'=111.

Явам код отправил на картинке сами перепишите с именим город

Pascalabc.net 3.4.2, сборка 1864 от 11.11.2018

1)

begin

  var s : = readinteger;

  var a : = arrrandom; a.println;

  for var i : = 0 to a.length do

    if a.take(i + 1).sum > s then  

    begin

      i.println;  

      exit;  

    end;

    10.println;

end.

2)

begin

  var s : = readlnstring;

  println(s.towords.count,'слов(-о, -а) в строке.');

  println(s.split(' ').joinintostring('').count,'букв(-а, -ы) в строке.');

end.

#include < iostream> using namespace std; int main() { setlocale(lc_all, "russian"); // язык int i = 0; //кол-во элкментов int n0; //первый член int n[1000]; //массив int input; //ввод while(cin > > input & & input ! = 0) //заполнение массива { i++; if(i == 1) { n0 = input; }else { n[i] = input; } } //вывод cout < < endl < < n[i] < < " "; for(int p = 2; p < i; p = p + 1){ cout < < n[p] < < " "; } cout < < n0 < < " "; return 0; }