Рішення завдання на репіт Антил - pascal abc

привіт всім допоможіть вирішити задачу дано число n (кол-вл чисел не відомо) знайти скільки в цьому числі цифр A (вводиться з клави) і чи є цифра A першим числом і цифра B (вводиться з клави) последнімДобавлено через 59 секунд program cikl_3; uses crt; var cifra, n, a, b, ai, bi: integer; begin writeln ( 'введіть число'); readln (n); writeln ( 'введіть числа для перевірки'); readln (a, b); repeat begin ai: = 0; bi: = 0; cifra: = n mod 10; if a = cifra then ai: = ai + 1; n: = n div 10; end; until n> 0; if b = cifra then bi: = bi + 1; writeln (ai, cifra, bi); readln; end. ось сама прога але вона не працює (((

потрібна область-заштрихованная. радіус дорівнює 4

Напишіть програму, яка знаходить все різні цифри в символьної строке.Входние дані На вхід програмі подається символьний строка.Виходние дані Програма повинна вивести в одному рядку всі різні цифри, які зустрічаються в заданій стрічці, в порядку зростання. Якщо в рядку немає цифр, потрібно вивести слово 'NO'.Прімери: вхідні дані ab1n32kz2виходние дані 123входние дані asdasdвиходние дані NO

Описати процедуру SqP (x1, y1, x2, y2, P, S), яка обчислює периметр P і площа S прямокутника зі сторонами, паралельними осям координат, за координатами (x1, y1), (x2, y2) його протилежних вершин (x1, y1, x2, y2 - вхідні, P і S - вихідні параметри дійсного типу). За допомогою цієї процедури знайти периметри і площі трьох прямокутників з протилежними вершинами. P.S. допоможіть будь ласка це вирішити, заранее спасибо за допомогу)

Дана послідовність, що містить від 2 до 50 слів, в кожному з яких від 1 до 8 малих латинських букв; між сусідніми словами - не менше одного пробілу, за останнім словом - крапка. Надрукувати ті слова послідовності, які відмінні від першого слова і задовольняють наступному властивості: слово симетрично

Заповнити числами, починаючи з одиниці, квадратний масив з NxN елементів «змійкою». Приклад, для масиву 4х4: Код 1 2 3 4 8 7 6 5 9 10 11 12 16 15 14 13 Реалізувати введення розмірності з клавіатури

Підстави трапеції паралельні осі X, нижня частина більше верхнього. Вихідна точка, від якої починається малювання трапеції, зверху справа. Задаємо довжини підстав трапеції N і K, висоту h, і координати X1, Y1 однієї вершини. Обчислюємо координати другої, третьої і четвертої вершин X2, Y2, X3, Y3, X4, Y4. Малюємо трапецію за допомогою операторів Line за координатами чотирьох точок. Додатково необхідно намалювати коло, радіусом 5 пікселів, в точці Х1, Y1. (Примітка: для обчислення координат точок використовується цілочисельне ділення DIV).

Дана квадратна матриця порядку n. Обнулити елементи матриці, що лежать одночасно вище головної та побічної діагоналей. Будь ласка, СРОЧНО.

Рішення завдання на репіт Антил - pascal abc

Чи не працює програма або їй не відповідає опис. Повідомте будь ласка нам про це, заповнивши просту форму. Спасибо =) Зробити сайт краще

Схожі статті