Отправлено: 15.03.19 15:03. Заголовок: Задача А и B из он-лайн задачника к учебнику

Здравствуйте, уважаемый Константин Юрьевич!

Посмотрите, пожалуйста, задачи A и B к теме Символьные строки из параграфа 66. Решение на Free Pascal проходит на 100 баллов. Там я сделал тип строчки s: Ansistring. С детьми я работаю на ABC.Pascal. Один тест не проходит. Насколько я поняла, в этой задаче никто не смог на ABCPascal сдать на 100 баллов.
Может я где-то ошибаюсь.
Во второй задаче такая же проблема.

Условие:
Напишите программу, которая заменяет в символьной строке все буквы a на буквы b (латинские, строчные).

Входные данные
Входная строка содержит символы латинского алфавита, как строчные, так и заглавные.

Выходные данные
Программа должна заменить во всей строке строчные буквы a на буквы b и вывести в первой строке получившуюся символьную строку, а во второй – количество выполненных замен.

Решение:

Var s:string;
k,i:integer;
Begin
Readln(s);
For i:= 1 to Length(s) do
if s='a' then
begin
s:='b';
inc(k);
end;
writeln(s);
writeln(k);
End.

С уважением,
Сохова Зарема

 Отправлено: 15.03.19 15:10. Заголовок: Zarema_s пишет: С де..

Zarema_s пишет:

цитата:

С детьми я работаю на ABC.Pascal. Один тест не проходит.

Здравствуйте! Дело в том, что у Паскаля ABC не хватает быстродействия на последнем тесте, где очень длинная строка. Если вы не используете какие-то особенности именно Паскаля ABC, при отправке решения просто выбирайте FreePascal.

 Отправлено: 21.03.19 22:14. Заголовок: Добрый вечер! Спаси..

Добрый вечер!

Спасибо за ответ. Я так и сделала, просто хотела убедиться, вдруг я ошибаюсь, и какое-то еще решение есть.

С уважением,
Сохова Зарема