По разделам

 

Решение задачи Proc 21


Описать функцию SumRange(A, B) целого типа, находящую сумму
всех целых чисел от A до B включительно (A и B — целые). Если A > B,
то функция возвращает 0. С помощью этой функции найти суммы чисел
от A до B и от B до C, если даны числа A, B, C

Код (C/C++)

#include <stdio.h>
int sumrange(int a, int b){
   int sum=0;
   for (;a<=b;++a){sum+=a;}
   return sum;
}
 
int main(void)
{
    int a,b,c;
    printf("a:");
    scanf("%i", &a);
    printf("b:");
    scanf("%i", &b);
    printf("c:");
    scanf("%i", &c);
    printf("Sum:%i\n",sumrange(a,b));
    printf("Sum:%i\n",sumrange(b,c));
    return 0;
}

Код (Python)

import random
import math

def SumRange(A,B):
    if A > B:
        return 0
    else:
        return sum(range(A,B+1))

A,B,C = [random.randrange(1,11) for i in range(0,3)]
print("A =",A)
print("B =",B)
print("C =",C)
print("SumRange({0},{1}) = {2}".format(A,B,SumRange(A,B)))
print("SumRange({0},{1}) = {2}".format(B,C,SumRange(B,C)))
									

Код (Pascal)

program Proc21;
 
Function SumRange(A,B:Integer):Integer;
var
 i,TempSum:Integer;
begin
 TempSum:=0;
 For i:=A to B do
  begin
   TempSum:=TempSum + i;
  end;
  SumRange:=TempSum;
end;
 
var
  A,B,C:Integer;
 
begin
  Write('A :');
  Readln(A);
  Write('B :');
  Readln(B);
  Write('C :');
  Readln(C);
 
  Writeln(SumRange(A,B));
  Writeln(SumRange(B,C));
end.
									




Proc. Абрамян
Proc 1 Просмотров: 6512
Proc 2 Просмотров: 5032
Proc 3 Просмотров: 5116
Proc 4 Просмотров: 4303
Proc 5 Просмотров: 3362
Proc 6 Просмотров: 4607
Proc 7 Просмотров: 3892
Proc 8 Просмотров: 2985
Proc 9 Просмотров: 3123
Proc 10 Просмотров: 2883
Proc 11 Просмотров: 2984
Proc 12 Просмотров: 2183
Proc 13 Просмотров: 2423
Proc 14 Просмотров: 2655
Proc 15 Просмотров: 1865
Proc 16 Просмотров: 2841
Proc 17 Просмотров: 2485
Proc 18 Просмотров: 2406
Proc 19 Просмотров: 2324
Proc 20 Просмотров: 3170
Proc 21 Просмотров: 3299
Proc 22 Просмотров: 2401
Proc 23 Просмотров: 2398
Proc 24 Просмотров: 1660
Proc 25 Просмотров: 2033
Proc 26 Просмотров: 1806
Proc 27 Просмотров: 2008
Proc 28 Просмотров: 1737
Proc 29 Просмотров: 1915
Proc 30 Просмотров: 2445
Proc 31 Просмотров: 1669
Proc 32 Просмотров: 1221
Proc 33 Просмотров: 1250
Proc 34 Просмотров: 1672
Proc 35 Просмотров: 1154
Proc 36 Просмотров: 1613
Proc 37 Просмотров: 1474
Proc 38 Просмотров: 1194
Proc 39 Просмотров: 1098
Proc 40 Просмотров: 1831
Proc 41 Просмотров: 1897
Proc 42 Просмотров: 1149
Proc 43 Просмотров: 1116
Proc 44 Просмотров: 998
Proc 45 Просмотров: 1129
Proc 46 Просмотров: 999
Proc 47 Просмотров: 1061
Proc 48 Просмотров: 811
Proc 49 Просмотров: 1046
Proc 50 Просмотров: 2078
Proc 51 Просмотров: 1682
Proc 52 Просмотров: 1687
Proc 53 Просмотров: 1173
Proc 54 Просмотров: 1260
Proc 55 Просмотров: 1145
Proc 56 Просмотров: 1739
Proc 57 Просмотров: 1489
Proc 58 Просмотров: 1172
Proc 59 Просмотров: 1083
Proc 60 Просмотров: 1365

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться



Заявка на расчет