Вася перемножил все натуральные числа до своего возраста. Определите возраст Васи. Например, если значение равно 120, то Васе 5 лет, т.к 1*2*3*4*5=120.
5-9 класс
|
Pascal, Turbo Pascal
var n, i, p : integer;
begin
readln(n);
p := 1;
i := 2;
while p < n do begin
p := p * i;
i := i + 1;
end;
if p = n then
writeln(i - 1)
else writeln('вася ошибся');
end.
Другие вопросы из категории
Дан прямоугольный треугольник с катетами a и b,найдите его гипотенузу.
Читайте также
натуральные числа A , B, где B>A. Напишите программу последовательность натуральных чисел от A до B, включающая A и B.
Пожалуйста помогите !!!!!!!!
верно ли,что первая цыфраа данного числа чётная?
3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)
4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
вводит натуральное число N и выводит на экран все автоморфные числа, не превосходящие N.
дни(например, если введено число 1, то; 1 января - новый год , 7 января - Рождество).