1. Дано трехзначное число. Написать программу (Pascal), которая «переставляет» первую цифру числа
10-11 класс
|
на самое последнее место.
uses crt;
var a: integer;
begin
readln(a);
a:=(a div 10 mod 10)*100+(a mod 10)*10+(a div 100);
writeln(a);
end.
Другие вопросы из категории
Группа файлов
1)cabinda.xls
2) cubic.xlsx
3) irbic.xls
4) tobias.xls
Маски
1) ??bi*.xls
2) ??bi*.xls*
3) **bi*.xls*
4) ??bi*.x*
Пожалуйста поподробнее. Заранее спасибо
Читайте также
B рублей положенная в банк если годовая прибыль составляет С процентов. (используя только mod div. 1 курс корочи) заранее спасибо
Ввести с клавиатуры натуральное число.написать программу, которая определяет, кратна ли сумма его цифр 6.
2)построить блок схему которая меняет порядок цифр числа на обратный. например было 12345,стало 54321.
числа; • Найдите наибольшую цифру числа; • Найдите сумму цифр числа, больших 5.
число рядов. Написать программу подсчета мест в кинотеатре «Оскар», в соответствии со схемой кинотеатра, представленной ниже. На экран вывести итоговое количество мест.(вложение - 1 рисунок)
Программа 6. Найти значение выражения для вводимых с клавиатуры А, В и С. при А=4, В=2, С=5.(вложение - формула)
Программа 7. Написать программу, вычисляющую значения логического выражения . На экран вывести это значение.
Программа 8. Пользователь вводит число 0,515625. Написать программу, которая в точности повторяет алгоритм перевода данного числа из десятичной системы счисления в четверичную. На экран вывести окончательный результат.