Главная arrow icon Вопросы arrow icon Учеба и наука arrow icon Информатика arrow icon Паскаль: найти произведение целых чисел от…

Паскаль: найти произведение целых чисел от 5 до n, Вторая задача:дано натур число n . Сколько цифр в числе n? - вопрос №1069938

Натали
25.05.14
Учеба и наука / Информатика
2 ответа

Лучший ответ по мнению автора

Валентина
program pr1;
var n,i:integer; p:longint;
begin
  writeln ('vvedite n');
readln(n);
p:=1;
for i:=5 to n do
  p:=p*i;
writeln('p=',p);
readln;
end.
25.05.14
Лучший ответ по мнению автора

Другие ответы

Валентина
program pr2;
var n:longint;
k:integer;
begin
  writeln('vvedite chislo');
readln(n);
k:=1;
while n<>0 do
begin
  k:=k+1;
  n:=n div 10;
end;
writeln('k=',k);
readln
end.
  
25.05.14

Еva
от 100 p.
Рейтинг: 121 998
6-й в Учебе и науке
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Похожие вопросы
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store
  • карты visa
  • карты master card
  • карты maestro
  • карты МИР
Мы используем файлы cookie. Пользуясь сайтом, вы принимаете условия нашего соглашения. Принять Детальнее