tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу на паскале,
Написать программу на паскале, определяющую, является ли количество букв во введенном слове четным или нечетным.
nikaz1
1 08.06.2019 02:00
1
Ответы
yotuber
07.07.2020 13:31
Var str: String;
begin
ReadLn(str);
if length(str) mod 2 = 0 then WriteLn('Четное.')
else WriteLn('Нечетное.');
ReadLn
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Sofiaminkina06
31.01.2021 12:17
Дан Одномерный Целочисленный размером n.Вывести количество чисел кратных 7 и оканчивающихся на один. Программа - Pascal(9 класс) Очень благодарен!...
0Artemka0
16.04.2021 13:32
Задание 3. Для групповых операций с файлами используют файлов. Маска представляет собой последовательность букв,допустимых в именах файлов символов, в которых также моследующие...
demorgan512
16.04.2021 13:33
1) Напишите название функции из модуля random, которая генерирует случайное целое число в указанном диапазоне 2)Выберите функцию для перемещения объекта на холсте по горизонтальной...
богдан254
27.11.2019 15:03
Что не так? (сравнить что больше сумма положительных или произведение отрицательных)program ee; var n,i,kolp,kolo: integer; sum,po,a: real; beginwriteln ( сколько чисел вы будете...
kristka98
27.11.2019 15:03
Вопросы: 1) предположим, что компьютер работающий в двоичной системе счисления оперируют с семизначными числами. какое максимальное число он воспринимает? ответьте на тот же...
Shkolnik12345678910
06.08.2019 05:40
Запишите десятичный эквивалент числа 10101, если считать его написанным во всех системах счисления - от двоичной до девятиричной включительно...
iskanderkhusano
06.08.2019 05:40
Информационный объем текста с мощностью алфавита 256 символов и 100 символов равен. 1. 100 байт 2.100 бит 3. 1 кбайт 4. 256 000 байт...
тузель
06.08.2019 05:40
1)перевести в 8 и 16 системы счисления числа : 1111110111101( это число стоит во 2 системе) и 1010101010100000 ( это тоже стоит во 2) 3) вычислить 132(в 8 системе) + 1001111...
boikov2o
29.04.2021 10:24
Причини та привід конфлікту між колоніями та метрополією. А введення незначного зборуБ расова дискримінація В чайний бунт у БостоніГ прийняття конституції СШАДВІ ВІДПОВІДІ. ДОБОМОЖІТЬ...
Danlika
29.04.2021 10:25
900*3,03* 10 в - 7 степени...
Популярные вопросы
Y=|x|+4 найти множество значений?...
3
нужно заполнить таблицу про 20 в...
1
Батыс еллерінде жаңа заманға тән қандай өзгерістер жүрді...
3
-6,5: 0,05 = 1/2 : (-3/7) = -2 × 0,06 = -14 - ( 1 1/6) = 7,2 - ( - 1/5) =...
1
Как понять, что число является целым, но не является натуральным...
2
Оберiть один iз художнiх творiв, що вам найбiльше подобаеться, i поясніть...
3
Добрый вечер. Даны два множества А и B. Множество А — множество равносторонних...
3
Перетворіть вираз на многочлен:1) (3a - 5)^22) (7 +2b)(2b - 7)...
1
1) 1,2 - 6= 2)1/2*(-2)= 3)(-1/7)*(7/9)= 4)(-3)*(-1/3)= Решите...
1
Визначте силу струму та напруги на кожному резисторі, якщо амперметер показує...
2
begin
ReadLn(str);
if length(str) mod 2 = 0 then WriteLn('Четное.')
else WriteLn('Нечетное.');
ReadLn
end.