Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Нужна доделать программу! Нужно найти порядковый номер максимального числа.Я нашел максимальное число.Найдите его порядковый номер. program z5; const n=10; var i,s,x,max:integer; a:array of integer; begin {создание массива} for i:=1 to n do begin https://www.cyberforum.ru/ pascalabc/ thread2774960.html Фотографии текста запрещены. Темы называйте осмысленно. Pascal ABC
Задан массив x из вещественных чисел, n=100. Вычислить сумму S=nx1+(n-1)x2+(n-2)x3+...+2xn-1+xn
Pascal ABC Не могу сделать программу мне нужно определить наибольшее из 3 чисел введённых с клавиатуры. Я пытался, но у меня постоянно вылезают разные ошибки сейчас у меня ошибка операнды имеют неприводимые типы. Помогите пж исправить. https://www.cyberforum.ru/ pascalabc/ thread2774842.html Pascal ABC Подсчитать количество чисел, больших заданного, в двумерном массиве Написать программу с любыми данными. Подсчитать количество чисел, больших заданного, в двумерном массиве. https://www.cyberforum.ru/ pascalabc/ thread2774546.html
Pascal ABC Перемножить два линейных массива
Написать программу с рандомными данными. Перемножить два линейных массива.
Pascal ABC Найти сумму случайно найденной последовательности https://www.cyberforum.ru/ pascalabc/ thread2774543.html
Написать программу на Pascal с любыми данными. Найти сумму случайно найденной последовательности.
Pascal ABC Найти среднее значение последовательности случайно заданных чисел Написать программу на Pascal с любыми данными. Найти среднее значение последовательности случайно заданных чисел. https://www.cyberforum.ru/ pascalabc/ thread2774540.html Pascal ABC Подсчитать количество чисел, больших заданного, в трёхмерном массиве
Написать программу на Pascal с любыми данными. Подсчитать количество чисел, больших заданного, в трёхмерном массиве.
Pascal ABC Подсчитать количество чисел, меньших заданного, в двумерном массиве https://www.cyberforum.ru/ pascalabc/ thread2774537.html
Написать программу с рандомными данными. Подсчитать количество чисел, меньших заданного, в двумерном массиве.
Pascal ABC Нельзя преобразовать тип integer к System.Drawing.Color https://www.cyberforum.ru/ pascalabc/ thread2774473.html
Program Circles; Uses GraphABC, CRT; var r : integer; begin SetWindowSize(500,500); repeat SetBrushColor(random($FFFFFF)); circle(random(500),random(500),random(10)); delay(10); until keypressed;
Обработать информацию об автобусах в автобусном парке Pascal ABC
Задача Написать программу, которая обрабатывает информацию об автобусах в автобусном парке. Структура данных о каждом автобусе содержит: - номер автобуса; - номер маршрута; - признак того, где находится автобус - на маршруте(1) или в парке(0). • Программа должна обеспечивать: - чтение из файла данных об автобусах; - по запросу выдавать сведения об автобусах, находящихся в парке, или об...
Pascal ABC Вычислить сумму и произведение двузначных натуральных чисел https://www.cyberforum.ru/ pascalabc/ thread2774341.html
..vsemprivet Написать программу вычисляющую сумму и произведение двузначных натуральных чисел
5 / 4 / 1
Регистрация: 25.10.2019
Сообщений: 149
26.01.2021, 20:10  [ТС] 0

Последняя ненулевая цифра N! - Pascal ABC - Ответ 15213399

26.01.2021, 20:10. Показов 1932. Ответов 4
Метки (Все метки)

Ответ

Цитата Сообщение от Puporev Посмотреть сообщение
вместо 250 свое введеное число.
Пробовал, оно не пашет. Вообще ответы не те
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
  n:qword;
  i:integer;
begin
  read(n);
  for i:=1 to n do
  begin
    n:= n * i;
    while n mod 10 = 0 do n := n div 10;
    n:= n mod 1000;
  end;
  writeln(n mod 10);
end.


Вернуться к обсуждению:
Последняя ненулевая цифра N! Pascal ABC
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.01.2021, 20:10
Готовые ответы и решения:

Определить сколько раз в числе встречается последняя цифра
1) Дано натуральное число. Определить сколько раз в нем встречается последняя цифра. в 1, 4, 5...

Определите, сколько чисел, у которых последняя цифра 3, 5 или 7
Доброго времени, уважаемые! решаю задачу : "Введите множество, состоящее из 20 целых чисел от 1...

Удалить из файла все элементы в которых последняя цифра 3
Удалить из файла все элементы в которых последняя цифра 3

Удалить из массива все элементы, в которых, последняя цифра четная
Приветствую форумчане. Прошу вас помочь с заданием. Дан массив целых чисел (n=15), заполненный...

4
26.01.2021, 20:10
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.01.2021, 20:10
Помогаю со студенческими работами здесь

Определить, во сколько раз последняя цифра больше первой в числе
Помогите составить!2. Вводится с клавиатуры число в диапазоне . Найти сумму цифр, составляющих...

Выяснить, первая или последняя цифра в записи числа наибольшая
Пожалуйста, помогите составить код программы такой задачи: Дано трёхзначное число. Выяснить первая...

Определить трехзначное число, у которого первая и последняя цифра чётные
Дан массив из 10 целых чисел. Напишите программу вычисления суммы элементов массива среди,...

Упорядочить по возрастанию только те элементы, последняя цифра которой равна К
Написать программу, которая упорядочивает по возрастанию только те элементы заданной...

Выбрать четные числа файла, у которых последняя цифра отлична от нуля
В файле data.txt записаны числа, сколько их – неизвестно. Выбрать четные числа, у которых последняя...

Дано натуральное число, определите сколько раз в нём встретится последняя цифра
Дано натуральное число, определите сколько раз в нём встретится последняя цифра. решение нужно...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru