Между населёнными пунктами А, В, С, D, Е построены дороги, протяжённость которых (в километрах) приведена в таблице: A B C D E

A 1

B 1 2 2 7

C 2 3

D 2 4

E 7 3 4

Определите длину кратчайшего пути между пунктами А и E. Передвигаться можно только по дорогам, протяжённость которых указана в таблице.

Решалось примерно следующим образом:

Объявить две переменные для числа n и суммы чисел. А хотя нет. Надо три(ещё управляющая переменная для for)

Ввести число n

Зная, что натуральные числа - это все числа от единицы, создаём цикл for с таким условием: управляющая переменная i = 1, i < n i++(увеличить на 1)

(на паскале будет примерно так:

for i := 1 to (n - 1) do

   begin

     

   end;

)

Далее в теле цикла сделать условие: если i делится без остатка, то прибавить это число к переменной для суммы чисел(которая в начале равна 0)

Ну и в конце вывести сумму.

 

Вот вариант на C++

 

#include <iostream>
using std::cout;
using std::cin;
using std::endl;

int main()
{
   int n, total = 0;

   cout << "Enter the number: ";
   cin >> n;

   for(int i = 1; i < n; i++)
   {
      if(i % 3 == 0)
      {
         total += i;
      }
   }

   cout << "Sum = " << total << endl;

   cin.get();
   return 0;
}

 

Вроде и на Паскале получилось:

 

program test;
var i, n, total:integer;
begin
  write('Enter n: ');
  readln(n);
  total := 0;
  for i := 1 to (n - 1) do
  begin
    if i mod 3 = 0 then
    total := total + i;
  end;
  writeln('sum = ', total);
readln();
end.

Var a: array[1..10] of integer;
    b: array[1..10] of real;
    i,n: integer;
    s: real;
begin
  s:=0; n:=0;
  write('массив a:  ');
  for i:=1 to 10 do
  begin
    read(a[i]);
    if a[i]<0 then 
    begin
      s:=s+a[i];
      n:=n+1;
    end;  
    write(a[i],' ');
  end;
  s:=s/n; 
  writeln;
  writeln('среднее арифметическое отрицательных: ',s);
  writeln('количество отрицательных: ',n);
  write('массив b:  ');
  for i:=1 to 10 do
  begin
    if a[i]<0 then b[i]:=s
    else b[i]:=a[i];
    write(b[i]:7:3);
  end;
end.

массив a:  2 2 -3 1 -5 -6 -5 9 -7 5 
среднее арифметическое отрицательных: -5.2
количество отрицательных: 5
массив b:    2.000  2.000 -5.200  1.000 -5.200 -5.200 -5.200  9.000 -5.200 5.000