Запросить строку с клавиатуры и подсчитать в ней количество цифр, букв, пробелов. Написать программу на языке Турбо Паскаль.
Заполнить двухмерный массив 5 на 6 по формуле I*I-А*J и подсчитать количество неотрицательных элементов, включая ноль. Коэффициент А запросить с клавиатуры. Написать программу на языке Турбо Паскаль.
Заполнить массив из 12 элементов случайными целыми числами от -100 до 100 и подсчитать количество неотрицательных значений, включая ноль. Написать программу на языке Турбо Паскаль.
Имеется восемь кружков. Их начальное положение показано на рисунке.
(посередине — пустое поле). Цель игрока: поменять местами белые и черные фишки за наименьшее число ходов. Любую фишку можно перемещать только на пустое соседнее поле или же через одно занятое поле, опять-таки в пустое. Переводить фишки в другое место нельзя. На любом поле может находиться только одна фишка.
Разработать функцию MakeStr(const S:string):string, возвращающую строку, состоящую из всех гласных латинских букв строки S без повторений. С помощью данной функции для каждой строки из введенного набора вывести все ее гласные латинские буквы без повторений. Гласными считаются следующие буквы: aeiouyAEIOUY.
Пусть в массиве содержатся результаты измерений температуры воздуха, которые проводились ежедневно в течение декабря месяца. Требуется определить:минимальную температуру второй декады декабря, день, когда температура была ближе всего к средней температуре в декабре.
Написать процедуру сохранения в текстовом файле имен компонентов заданного класса, использованных на форме. Входящий параметр – класс компонентов (TClass), путь и имя файла (String).