Практикум по программированию на Java 1
основных конструкций языка Java. Освоить принципы компиляции и запуска java-программ в IDE. Задание. Разработайте программы на языке Java, показывающие стандартные битовые операции.
Задачи на Python
1 ************************************************************************** Напишите простой калькулятор, который считывает с пользовательского ввода три строки: первое число, второе число и операцию,
Работа с файлами С++
Написать программу, которая считывает текст из файла и записывает в другой файл только предложения, не содержащие запятые.
Задание 6. Сжатие Что нужно сделать Из-за того, что объём данных увеличился, понадобилось сжать эти данные,…
исходной строки заменяются на эти символы и количество их повторений в строке. Напишите программу, которая считывает строку, кодирует её, используя предложенный алгоритм, и выводит закодированную последовательность
Ответ на вопрос
Программа для сжатия строкиВвод строкиs = input("Введите строку: ")Инициализация переменныхencoded_string = ''
count = 1Цикл для кодирования строкиfor i in range(len(s)):
if i != len(s)-1:
if s[i] == s[i+1]:
count += 1
else:
encoded_string += s[i] + str(count)
count = 1
else:
encoded_string += s[i] + str(count)Вывод закодированной строкиprint("Закодированная строка:", encoded_string)
Еще
Информатика Паскаль 10-11класс Напишите программу, которая считывает с клавиатуры n символов и затем выводит…
Информатика Паскаль 10-11класс Напишите программу, которая считывает с клавиатуры n символов и затем выводит на экран:a) количество считанных десятичных цифр;b) количество четных цифр;c) количество нечетных
Ответ на вопрос
program CountCharacters;var
n, i, digits, evenDigits, oddDigits, letters, vowels, consonants: integer;
ch: char;begin
digits := 0;
evenDigits := 0;
oddDigits := 0;
letters := 0;
vowels := 0;
consonants := 0;writeln('Enter the number of characters: ');
readln(n);writeln('Enter ', n, ' characters: ');for i := 1 to n do
begin
readln(ch);case ch of
'0'..'9': begin
digits := digits + 1;
if (Ord(ch) - Ord('0')) mod 2 = 0 then
evenDigits := evenDigits + 1
else
oddDigits := oddDigits + 1;
end;
'A'..'Z', 'a'..'z': begin
letters := letters + 1;
case UpCase(ch) of
'A', 'E', 'I', 'O', 'U', 'Y': vowels := vowels + 1;
else consonants := consonants + 1;
end;
end;
end;end;writeln('Number of decimal digits: ', digits);
writeln('Number of even digits: ', evenDigits);
writeln('Number of odd digits: ', oddDigits);
writeln('Number of letters: ', letters);
writeln('Number of vowels: ', vowels);
writeln('Number of consonants: ', consonants);
end.
Еще