Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.79/29: Рейтинг темы: голосов - 29, средняя оценка - 4.79
0 / 0 / 0
Регистрация: 01.05.2012
Сообщений: 11
1

Найти сумму, произведение и количество трехзначных чисел, оканчивающихся на 0

29.05.2012, 09:31. Показов 5281. Ответов 2
Метки нет (Все метки)

Найти сумму,произведение и кол-во трехзначных чисел оканчивающихся на 0.
помогите, пожалуйста!
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.05.2012, 09:31
Ответы с готовыми решениями:

Найти сумму трехзначных чисел кратных 9 и их количество
Найти сумму трехзначных чисел кратных 9 и их количество. Добавлено через 33 секунды решите...

Вводится 15 чисел.Найти максимальный элемент среди положительных трехзначных чисел и произведение последних трех
Вводится 15 чисел.Найти максимальный элемент среди положительных трехзначных чисел и произведение...

Найти сумму чисел, оканчивающихся на 1
1)Определяет набор чисел, которые разделив 4 на периметра 2)Сумма чисел, оканчивающиеся в 1 на...

Найти количество чисел оканчивающихся на число 6
помогите ,пожалуйста (собрать программу на Pascal) дано произвольное количество чисел. найти...

2
Фрилансер
3412 / 2809 / 3000
Регистрация: 08.02.2012
Сообщений: 8,093
Записей в блоге: 1
29.05.2012, 09:59 2
Лучший ответ Сообщение было отмечено sarek как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Var i,s,k:integer;
    p:real;
Begin
    i:=100;s:=0;p:=1;k:=0;
    While i<990 do
     Begin
      s:=s+i;
      p:=p*i;
      inc(k);
      inc(i,10);
     End;
    writeln('Сумма: ',s);
    writeln('Произведение: ',p:0:0);
    writeln('Кол-во: ',k);
End.
1
0 / 0 / 0
Регистрация: 01.05.2012
Сообщений: 11
29.05.2012, 10:16  [ТС] 3
спасибо
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.05.2012, 10:16

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Цикл Дана непостая последовательность целых чисел, оканчивающихся нулем. Найти сумму всех чисел последовательности, большее числа х
Цикл Дана непостая последовательность целых чисел, оканчивающихся нулем. Найти сумму всех чисел...

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

Найти количество трехзначных чисел
Найти количество трехзначных чисел, сумма цифр которых равняется N

Найти количество чисел последовательности, оканчивающихся на 3, до первого четного
Помогите составить программу: &quot;Вводится последовательность целых чисел до первого четного числа....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.