Паскаль Дано натуральное число.Найти первую и последнюю цифру
5-9 класс
|
Program Pr1;
var a:integer;
Begin
readln(a);
writeln('Posl.- ',a mod 10);
while a div 10 <>0 do a:=a div 10;
writeln('Perv.- ',a);
end.
Другие вопросы из категории
два дня недели продано: понедельник - X кг. яблок, Y кгю груш, Z кгю Апельсинов (X,Y,Z - принимают разные значения в понедельник и во вторник). Напишите Программу, которая будет вычислять, на какую сумму прдал магазин фруктов в каждый из этих дней и за оба дня вместе.
Читайте также
верно ли,что первая цыфраа данного числа чётная?
3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)
4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
не превышает 30 000. Программа должна напечатать только число, равное значению меньшей из его первой и последней цифр. Если число состоит из одной цифры, то минимальным является значение самой этой цифры.
Примеры работы программы:
Ввод: 3; Вывод:3
Ввод: 2194; Вывод: 2
n.
а) Напечатать те натуральные числа, квадрат которых не превышает n.
3) Дано натуральное число. Определить:
а) количество цифр 3 в нем;
г) сумму его цифр, больших пяти;
Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5.
3)Дано целое число а и натуральное (целое неотрицательное) число n. Вычислить а в степени n, используя в программе лишь операцию умножения.
4)Введите последовательность из n целых чисел. Найти наибольшее из всех отрицательных чисел. Вывести его значение и порядковый номер.
5)Вычислите: 99-97+95-93+91-89+....+7-5+3-1.
6)Доказать (путем перебора возможных значений), что для любых величин А, В, С типа Boolean следующая пара логических выражений имеет одинаковые значения (эквивалентны): A OR (B AND C) и (A OR B) AND (A OR C).