Регистрация
netznanie
22.11.2022 22:27
Информатика
Есть ответ 👍

Ввести с консоли строку символов произвольной длины (до 80 символов). поменять в ней все маленькие символы ‘a’ и ‘b’ на заглавные и вывести на консоль полученную строку.

237
248
Посмотреть ответы 2

Ответы на вопрос:

Ejdncenejfjdj
Ejdncenejfjdj
4,5(41 оценок)
// pascalabc.net 3.0, сборка 1156 от 30.01.2016 begin   var s: =readlnstring('вводите строку: ');   for var i: =1 to s.length do       case s[i] of       'a': s[i]: ='a';       'b': s[i]: ='b'       end;   writeln(s) end. тестовое решение: вводите строку: the monkey ate five bananas the monkey ate five bananas
tinyshbaev
tinyshbaev
4,5(77 оценок)

var

  k, n, summ, i, max, min: integer;

begin

  write('n = '); readln(n);

  write('k = '); readln(k);

  max : = 9;

  min : = 1;

  for i : = 2 to n do

  begin

      max : = max * 10 + 9;

      min : = min * 10;

  end;

  for i : = min to max do

      if i mod k = 0 then

          summ : = summ + i;

  writeln('сумма = ', summ);

end.

Популярно: Информатика