Объясните что требуется в задачах, пожалуйста

BitRoW

Дата: Пятница, 19.03.2010, 00:29 | Сообщение # 1

Знакомый

Группа: Пользователи

Сообщений: 11

Репутация: 0

Замечания: 0%

Статус: Offline

1) дано число n из чисел 1,4, 9, 16... и т.д. найти те, которые не превышают n.
2) дана не пустая последовательность целых чисел оканчивающаяся на 0. найти сумму чисел поледовательности больше числа "х"

и помоготите решить
3) дано натуральное число. определить сколько раз встречается цифра, равняя последней)

Если нарушил, правила создания темы, то не удите строго, пожалуйста) времени в обрез((((

говорит и показывает НОВОСИБ))))

Seqular

Дата: Воскресенье, 04.04.2010, 11:00 | Сообщение # 2

Хранитель

Группа: Администраторы

Сообщений: 859

Репутация: 35

Статус: Offline

1) Ну в общем эти числа - квадраты последовательности натуральных чисел.
Вводится n, затем находим квадраты числе в цикле и сравниваем с n. Выводим на экран, если они (квадраты) меньше. Если нашли больше либо равный, то останавливаем программу.

2) Как дана последовательность? Массив? Или поэлементный ввод? В общем в цикле пробегаем по всей последовательности, пока не встретим ноль. И складываем элементы последовательности с одной и той же переменной-счетчиком (большой размерности). В конце выводим эту переменную - она и будет суммой всех чисел.

3) Пусть дано число 65435132 (настучал на клаве произвольно)
Получить последнюю цифру можно так: l

Code

astD := X mod 10.

где X - наше произвольное число.
Затем последовательными

Code

X div 10 и X mod 10

находим все цифры числа и сравниваем с последней (считаем повторения).
Это для случая с числом. Для случая со строкой еще проще, но нужно уточнить, какой у тебя случай

Поддерживаю также проект сообщество молодых сисадминов

		Четверг, 09.01.2025
	Pascal 4 All