В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Полиняша
Полиняша
07.03.2020 13:45 •  Информатика

2. калькулятор (100 ) 2 секунды и 64 мб памяти в старинном калькуляторе работают только две клавиши — a и b. при нажатии клавиши aкалькулятор увеличивает число в два раза, а при нажатии клавиши b к числу прибавляется 1. на экране записано число 1. вам нужно вычислить число, которое получится на экране калькулятора после выполнения заданной последовательности операций. формат входного файла input.txt в единственной строке записана последовательность символов a и b без пробелов. длина строки не менее одного и не более 50 символов. формат выходного файла output.txt в единственной строке запишите целое число, которое получится после выполнения заданной последовательности операций. примеры input.txt примеры output.txt ab 3 ba 4

Показать ответ
Ответ:
Mastl
Mastl
24.06.2020 17:01
var
i,x: integer;
A,B: text;
s: string;
begin
x:=1;
assign(A,'input.txt');
reset(A);
read(A,s);
close(A);
for i:= 1 to length(s) do
 begin
 if s[i] = 'A' then x:=x*2;
 if s[i] = 'B' then x:=x+1
 end;
assign(B,'output.txt');
rewrite(B);
write(B,x);
close(B); 
end.   
0,0(0 оценок)
Ответ:
дара333
дара333
24.06.2020 17:01
C# без работы с файлами. Если задача c informatics.mccme.ru должно пройти.

string cmd = Console.ReadLine();     
int ans = 1; 
for (int i = 0; i < cmd.Length; i++) {
    if (cmd[i] == 'A')
        ans *= 2;
    else if (cmd[i] == 'B')
        ans++;
}
Console.WriteLine(ans);
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота