Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Дано натуральное число, определите последнюю цифру этого числа!

5-9 класс

Напишите пожалуйста программу для паскаля
ПРОШУ ВАС!)

Polinka4737 04 июня 2014 г., 22:46:48 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Tanjahihlova
05 июня 2014 г., 0:38:05 (9 лет назад)

program chik;
var n,a:integer;
begin
read(n);
a:=n mod 10;
writeln(a);
end.
здесь mod 10 делаем чтобы найти остаток от деления n на 10
при этом мы находим последнюю цифру
а если mod 100 сделать 2 последные цифры
mod 1000 три последные цифры
и т.д

Ответить

Другие вопросы из категории

Здравствуйте, задали задачу, но в ней почти ничего не понял:

Паскаль. Введите любое число и выведите на экран наибольшую цифру в числе.
Например ввожу 5683, а он мне должен вывести: 8.
Начало программы я допер:
program z1;
var n:integer;
begin
K:=0;
writeln('Введите любое число');
readln(n);
while n<>o do begin
n:=n div 10;
k:=k+1;
end;
... Тем самым мы нашли количество цифр в числе, а вот что делать дальше я не знаю(

Найдите ошибку

Program prim2;
Var x, y: real;
Begin
For x:=-10 to 10 do
Begin
y:-sqr (x);
Writeln ( x,' ', y)
end;
End.

Читайте также



Вы находитесь на странице вопроса "Дано натуральное число, определите последнюю цифру этого числа!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.