Как найти сумму всех двузначных чисел программа

Как найти сумму всех двузначных чисел программа

Лучший ответ

Jurii

Высший разум

(175098)


10 лет назад

Попробуй через формулу суммы первых членов арифметической прогрессии:

(10+99)/2*90

Тогда вся программа уложится в одну короткую строку:

begin WriteLn((10+99)/2*90) end.

Остальные ответы

Кысь

Гуру

(3318)


10 лет назад

Попробуй через FOR.

kaiu

Высший разум

(111799)


10 лет назад

цикл от 10 до 99 складывая 10+11+12 …+98 + 99
var i, sum : Integer;
sum := 0;
for i:=10 to 99 do sum := sum + i;

Striker

Мыслитель

(8223)


10 лет назад

сумма последовательности –
sum:=(10+99)*90/2;

Источник

72 / 3 / 0

Регистрация: 15.12.2010

Сообщений: 136

1

Составьте программу вычисления суммы всех двузначных чисел

10.12.2011, 10:38. Показов 40679. Ответов 1

Студворк — интернет-сервис помощи студентам

Составьте программу вычисления суммы всех двузначных чисел с помощью модуля. В модуле организовать работу цикла.



0

GoldenBoy

Goldeeeeeeen !

245 / 237 / 186

Регистрация: 15.10.2011

Сообщений: 457

10.12.2011, 12:47

2

Лучший ответ Сообщение было отмечено Olka! как решение

Решение

Цитата
Сообщение от Olka!
Посмотреть сообщение

суммы всех двузначных чисел

Pascal 
1
2
3
4
5
6
7

var i,c:integer;
begin
c:=0;
for i:=10 to 99 do
c:=c+i;
writeln(c);
end.

А по поводу

Цитата
Сообщение от Olka!
Посмотреть сообщение

с помощью модуля

я не в теме



1

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

 10.12.2011, 12:47

Помогаю со студенческими работами здесь

Составить программу для вычисления всех двузначных чисел
составить программу для вычисления всех двузначных чисел.

попроще, для ученицы 8 класса

Составьте программу вычисления суммы трехзначных чисел, в десятичной записи которых нет четных цифр
Составьте программу вычисления суммы трехзначных чисел, в десятичной записи которых нет четных цифр

Составьте программу для нахождения количества,суммы и произведения всех натуральных чисел, делящихся на 4 на отрезке [16,64]
Составьте программу для нахождения количества,суммы и произведения всех натуральных чисел,…

Процедуры и функции. Составьте программу вычисления суммы трехзначных чисел, в десятичной записи которых нет четных цифр
Составьте программу вычисления суммы трехзначных чисел, в десятичной записи которых нет четных цифр.

Написать программу вычисления суммы трех чисел, используя программу вычисления суммы двух чисел
2.Написать программу вычисления суммы трех чисел, используя программу вычисления суммы двух чисел.

Составить программу для вычисления суммы факториалов всех четных чисел от m до n
Составить программу для вычисления суммы факториалов всех четных чисел от m до n.

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

Или воспользуйтесь поиском по форуму:

2

Источник

Узнай цену своей работы

Формулировка задачи:

составить програму вычисления суммы всех двузначных чисел.

Код к задаче: «Вычислить сумму всех двузначных чисел»

textual

Листинг программы 

var
i:byte;
summ:longint;
begin
summ:=1;
for i:=10 to 99 do
summ:=summ+i;
writeln('Cymma=',summ);
end.

Полезно ли:

14   голосов , оценка 3.857 из 5

Похожие ответы

  1. Для заданного N вычислить сумму с точностью a
  2. Вычислить сумму из квадратного корня
  3. Программа с вычислением общей суммы цифр нескольких чисел
  4. Вычислить сумму всех элементов матрицы, удовлетворяющих условию
  5. Ввести с клавиатуры двумерный массив из 9 чисел, подсчитать сумму элементов всего массива
  6. Вычислить разность между максимальным и минимальным из чисел
  7. Написать программу, которая вычисляет среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел
  8. Вычислить среднее арифметическое значение последовательности целых чисел
  9. Написать программу которая вычисляет наибольший общий делитель двух целых чисел
  10. Найти максимальное количество идущих чисел подряд, сумма которых кратна семи
  11. Составьте рекурсивную подпрограмму, которая считает сумму первых n натуральных чисел

Источник

Опубликовано 3 года назад по предмету
Информатика
от lol1985

Напишите программу, которая вычисляет сумму всех двузначных чисел,на ПАСКАЛЬ

  1. Ответ

    Ответ дан
    petyaGavrikov

    var i,s:integer;
    begin
    s:=0;
    for i:=10 to 99 do s:=s+i;
    writeln(‘s = ‘,s);
    end.

    Результат:

    s = 4905

  2. Ответ

    Ответ дан
    furs1975

    var s,i:integer;
    begin
     s:=0;
     for i:=10 to 99 do s:=s+i;
    write(s);
    end.

Самые новые вопросы

Julia2101

Математика – 3 года назад

Решите уравнения:
а) 15 4 ∕19 + x + 3 17∕19 = 21 2∕19;
б) 6,7x – 5,21 = 9,54

na2005stud

Информатика – 3 года назад

Помогите решить задачи на паскаль.1)
дан массив случайных чисел (количество элементов
вводите с клавиатуры). найти произведение всех элементов массива.2)
дан массив случайных чисел (количество элементов
вводите с клавиатуры). найти сумму четных элементов массива.3)
дан массив случайных чисел (количество элементов
вводите с клавиатуры). найти максимальный элемент массива.4)
дан массив случайных чисел (количество элементов
вводите с клавиатуры). найти максимальный элемент массива среди элементов,
кратных 3.

Оксаночка1233

География – 3 года назад

Почему япония – лидер по выплавке стали?

Анимешка2

Математика – 3 года назад

Чему равно: 1*(умножить)х?     0*х?

laraizotova

Русский язык – 3 года назад

В каком из предложений пропущена одна (только одна!) запятая?1.она снова умолкла, точно некий внутренний голос приказал ей замолчать и посмотрела в зал. 2.и он понял: вот что неожиданно пришло к нему, и теперь останется с ним, и уже никогда его не покинет. 3.и оба мы немножко удовлетворим свое любопытство.4.впрочем, он и сам только еле передвигал ноги, а тело его совсем застыло и было холодное, как камень. 5.по небу потянулись облака, и луна померкла. 

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Источник

Задача 1.

Вывести на экран все четные двузначные числа.

Разберем задание:

Все двузначные числа -это числа от 10 до 99. 

Все четные числа -это числа , которые делятся на 2 без остатка.

Напомним : %- остаток от деления

Решение:

for i in range(10,100):

     if i%2==0:

        print(i)

Задача 2.

Рассматривается множество целых чисел, принадлежащих отрезку [3201;12876], которые
делятся на 4 и не делятся на 7, 11 и 13 . Выведите эти числа на экран.

Напомним : не делиться на число, значит остаток от деления не равен 0. Записывается так: х%а
!=0

Решение:

for i in range(3201,12877):

   if  (i %4==0) and (i%7!=0) and (i%11!=0) and (i%13!=0):

         print (i)

Задача 3.

Найти сумму всех четных двузначных чисел и произведение всех нечетных двузначных чисел.

Решение: 

Введем две переменные : S -сумма и P – произведение.

На самом начале они равны нулю.

S=0

P=1

for i in range (10,100):

     if  i%2==0:

         S=S+i

     else:

         P=P*i

print (‘сумма’ , S)

print (‘произведение’ ,P)

Источник

Добавить комментарий