написать программу в паскале
10-11 класс
|
Напишите программу, подсчитывающую количество
различных букв в заданном слове.
Входные данные: ввести строкy Y с длиной не более 255 символов.
AlinaKuznezz
13 февр. 2016 г., 9:17:57 (8 лет назад)
Полина2056
13 февр. 2016 г., 10:39:49 (8 лет назад)
var
y, b: string;
i: integer;
begin
readln(y);
for i := 1 to length(y) do
if (Pos(y[i], b) = 0) then
b := concat(b, y[i]);
writeln(length(b));
end.
Ответить
Другие вопросы из категории
Читайте также
1.тема циклы со сщетчиком.Написать программу в паскале для ввода с клавиатуры 15 чисел и вывода номеров отрицательных элементов.
2.написать программу в паскале
f(x)=2(sin*sin)x+1
Помогите написать программу в паскале. Задание:На плоскости даны 2 точки А (х1; у2) и В (х2; у2), определить какая из них находится дальше от начала коо
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
Написать Программу в паскале которая посчитала бы 5^123 (это цикл как бы должен быть)
http://primat.org/index/0-128 вот сайт что бы написать программу.
Помогите написать программу по Информатике! Найти произведение двузначных нечетных чисел, кратных
13.
Нужно написать программу на цикле с предусловием, на Паскале.
Написать программу Паскаль))) срочно!)))
Ввести с клавиатуры натуральное число.написать программу, которая определяет, кратна ли сумма его цифр 6.
Вы находитесь на странице вопроса "написать программу в паскале", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.