profile="http://gmpg.org/xfn/11"> ВычислСниС суммы чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10 Pascal. | Π Π°Π·Ρ€Π°Π±ΠΎΡ‚Ρ‡ΠΈΠΊΡƒ ΠΎ Ρ€Π°Π±ΠΎΡ‚Π΅ с 1Π‘:ΠŸΡ€Π΅Π΄ΠΏΡ€ΠΈΡΡ‚ΠΈΠ΅, Pascal, Паскаль

ВычислСниС суммы чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10 Pascal.

ВычислСниС суммы чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10 Pascal.

program Factor;

  {вычислСниС суммы чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10 Pascal}

var
  i_Sum, i: integer;
begin
  i_Sum := 0;
  for i := 6 to 10 do
    i_Sum := i_Sum + i;
  WriteLn('Π‘ΡƒΠΌΠΌΠ° чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10: ', i_Sum);

  //Π·Π°Π²Π΅Ρ€ΡˆΠ΅Π½ΠΈΠ΅ Ρ€Π°Π±ΠΎΡ‚Ρ‹ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹
  WriteLn('НаТмитС <Enter>, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Π²Ρ‹ΠΉΡ‚ΠΈ.');
  ReadLn();
end.

Π Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚:
ВычислСниС суммы чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10 Pascal
ВычислСниС суммы чисСл ΠΎΡ‚ 6 Π΄ΠΎ 10 Pascal.

ΠšΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€ΠΈΠΈ Π·Π°ΠΏΡ€Π΅Ρ‰Π΅Π½Ρ‹.