Материалы сайта
Это интересно
Вычислительная практика I курс
Смаль Дмитрий, АС-14 Работа № 5 (8) Тема: «Линейные программы» 1.Постановка задачи: Дано натуральное число n (n<=9999). Является ли это число полиандром (перевертышем) с учетом четырех цифр как, например, числа 2222, 6116, 0440 и т.д.? Указание. При написании программы не использовать условный оператор. 2. Схема алгоритма (смотри приложение). 3.Тестовые примеры: 1) Пусть n=1234, не является полиандром 2) Пусть n=4444, является полиандром 3) Пусть n=3003, является полиандром 4) Пусть n=2311, не является полиандром 4. Распечатка текста программы: Program Natural; Uses crt; Var c, d, k, h, n, w: Integer; t: Boolean; Begin Clrscr; Writeln (‘Введите число n<=9999’); Readln (n); c:= n mod 10; d:= (n div 10) mod 10; k:= (n div 100) mod 10; h:= n div 1000; w:=c*1000+d*100+k*10+h; Writeln(w); t:=n=w; Writeln(t); End. 5.Результаты тестирования программы: 1)Введите число n<=9999 3)Введите число n<=9999 1234 3003 4321 3003 False True 2)Введите число n<=9999 4)Введите число n<=9999 4444 2311 4444 1132 True False Приложение: -------- Остаток от деления n на 10 Остаток от деления на 10 -------- целочисленного деления n на 10 --------- Остаток от деления на 10 целочисленного деления n на 100 Целочисленное деление n на 1000 --------- Проверка равенства n=w --------- ----------------------- Конец Вывод значения логической переменной k Вывод значения w Логической переменной t присваиваем равенство n=w Переменной h присваивается число тысяч в числе n Переменной k присваивается число сотен в числе n Переменной d присваивается число десятков в числе n Переменной c присваивается число единиц в числе n Введите n<=9999 Начало