Напишите программу в Паскале, которая выводит на экран только нечётные символы (символы под номерами 1, 3, 5, ...)
10-11 класс
|
из текста пользователя.
var s,null:string;
i:integer;
begin
readln(s);
for i:= 1 to length(s) do
if i mod 2 = 1 then
null:=null+s[i];
writeln(null);
end.
Другие вопросы из категории
0 очков, если выпадают 3 или 6 — у игрока вычитаются 50 очков,
если выпадают 2 или 7 — баллы игрока, набранные прежде, умножаются на два,
если выпадает 1 или 8 — игрок становится банкротом (звуковой сигнал),
и если выпадает 0 или 9 — игрок получает 0 баллов.
надо написать команду условий( для паскаля)
Попадает ли т.М в заштрихованную область?
1)АЛУ
2)ПЗУ
3)оперативка
4)устройство ввода
5)устройство управления
Читайте также
2. Написать прогрумму,которая выводит на экран, разность значений двух вещественных массивов из 10 элементов.
подсчитать количество отрицательных элементов
сумму положительных элементов
ВЫВОДИТ НА ЭКРАН НОМЕРА ВСЕХ ЭЛЕМЕНТОВ, ЗНАЧЕНИЯ КОТОРЫХ =0
Программу реализовать с помощью трех циклических алгоритмов:
1) Цикл со счетчиком for
2) Цикл с предусловием while
3) Цикл с постусловием repeat
В программе предусмотреть ситуацию, когда пользователь вводит значение B ‹ A
Пример 1:
Пользователь вводит числа A=5, B=10. Сумма чисел: 5+6+7+8+9+10. Вывод на экран: 45
Пример 2:
Пользователь вводит числа A=7, B=4. Сумма чисел: 4+5+6+7. Вывод на экран: 22
Пример 3:
Пользователь вводит числа A=5, B=5. Сумма чисел: 5. Вывод на экран: 5