Люди, нужна ваша , используя программу pascal. незнающих прошу пройти мимо. следует составить 2 программы согласно 2 ниже : ) (ввод с клавиатуры) 1) найдите сумму первой и последней цифр четырехзначного числа. 2) записать четырехзначное число в обратном порядке.

234

338

Посмотреть ответы 3

Ответы на вопрос:

serpermiakov

Информатика

4,8(66 оценок)

// pascalabc.net 3.3.5, сборка 1636 от 10.03.2018 // внимание! если программа не работает, обновите версию! begin var n: =readinteger('введите четырехзначное число'); writeln('сумма первой и последней цифры равна ',n div 1000+n mod 10); writeln('реверс числа: ',n.tostring.inverse) end. пример введите четырехзначное число 5719 сумма первой и последней цифры равна 14 реверс числа: 9175

XOPOSHISTIK

Информатика

4,6(4 оценок)

Uses crt; var input: integer; begin readln(input); var a : = input mod 10; var b : = input div 10; b : = b div 10; b : = b div 10; writeln('сумма первой и последней цифры: ', a + b); b : = 0; while input > 0 do begin b : = b * 10 + input mod 10; input : = input div 10; end; writeln('перевернули цифру: ', b); end.

spiridon

Информатика

4,7(88 оценок)

Алгоритм может быть, например, таким. если нужно вывести нулевое число фибоначчи, выведем 1, иначе будем считать. сохраним в переменную номер текущего числа фибоначчи (изначально 1) и значения текущего и предыдущего элементов (в начале 1 и 1), затем в цикле будем пересчитывать значения элементов, увеличивая номер текущего элемента. когда номер элемента совпадёт с нужным, выведем ответ. реализация (python 3): n = int( if n == 0: print(1) else: prev, curr = 1, 1 i = 1 while i < n: curr, prev = prev + curr, curr i += 1 print(curr) запустив программу, можно узнать, что f10 = 89, f25 = 121393, а f40 = 165580141