Пожалуйста, напишите программу для того, чтобы в целом натуральном числе n поменять местами первую и последнюю цифру, с помощью цикла While в Pascal ABC.
5-9 класс
|
Дам за него 15 баллов. Пожалуйста, помогите!
program chik;
var n,a,b,s,q,k:integer;
begin
readln(n);
q:=n mod 10;
while n>0 do
begin
b:=n mod 10;
n:=n div 10;
s:=s*10+b;
end;
n:=q;
s:=s div 10;
while s>10 do
begin
k:=s mod 10;
s:=s div 10;
n:=n*10+k;
end;
n:=n*10+b;
writeln(n);
end.
Задача за 7 класс. Информатичка издевается.
Цикл while - обязательное условие? Он вообще не нужен тут по-моему
Обязательное. Мы его сейчас проходим и он там должен точно быть
Другие вопросы из категории
1. объект, который используется в качестве "заместителя", представителя другого объекта с определенной целью, назв. моделью.
2. модель обладает всеми признаками объекта-оригинала.
3. модель имеет существенные признаки объекта-оригинала.
4. модель содержит меньше информации, чем объект-оригинал.
5. модель содержит больше информации, чем объект-оригинал.
6. модель содержит столько же информации, что и объект-оригинал.
7. можно создавать и использовать разные модели объекта.
8. можно создавать и использовать единственную модель объекта.
9. можно создавать и использовать только натурные модели объекта.
количество лампочек должно находиться на табло, чтобы с его помощью можно было передавать 15 различных сигналов
последовательности, а затем сами числа. В последовательности всегда имеется число кратное 6. Кол-во чисел не превышает 100. Введённые числа не привышают 300. Программа должна ввести одно число - сумму чисел кратных 6
подберите вопросы к каждому слову как типа красворда
числа, то это новое число будет на единицу больше утроенного исходного числа . Найдите исходное число
Читайте также
2. Опишите массив для хранения зарплаты за каждый месяц. Зарплату считать целым числом.
3.Опишите: a)Переменную В для массива, состоящую из 8 символов. b)Переменную MAS для массива, состоящего из 100 вещественных чисел. c)Переменную DAY для массива, состоящего из 30 целых чисел, причем номер первого элемента массива должен быть равен 5
.4. Пусть А : array [1..10] of integer. Напишите операторы, соответствующие следующим действиям: a. Третий элемент массива сделать равным 5. b. Вывести на экран 7-й элемент массива. c. Ввести значение 1-го элемента массива. d. Вычислить сумму 1,2 и 3-го элементов массива.
5. Пусть А : array [1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Вычислить сумму всех элементов массива (используйте цикл).
6. Пусть C : array [1..10] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Вывести на экран все элементы массива.
7. Пусть А : array [1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Поменять местами первый и последний элементы массива.
8. Пусть В : array [1..20] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Заполнить массив случайными числами из интервала [-24;37].
не превышает 30 000. Программа должна напечатать только число, равное значению меньшей из его первой и последней цифр. Если число состоит из одной цифры, то минимальным является значение самой этой цифры.
Примеры работы программы:
Ввод: 3; Вывод:3
Ввод: 2194; Вывод: 2
ОЧЕНЬ НУЖНО!!! Заранее благодарю.
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
пожалуйста готовый, не сложный для того, чтобы выучить алгоритм. Буду очень благодарен.