Даны два целочисленных массива X и Y из 10 элементов.
Написать программу, которая подсчитывает и выдает на экран сумму x[i]*y[i].
...
sum:=0;
for i:=1 to 10 do
sum:=sum+x[i]*y[i];
writeln(sum);End.
Форум школьного программирования , решение задач на турбо паскале , решебник по информатике |
Привет, Гость! Войдите или зарегистрируйтесь.
Вы здесь » Форум школьного программирования , решение задач на турбо паскале , решебник по информатике » Решение задач на turbo pascal » Даны два целочисленных массива X и Y из 10 элементов.
Даны два целочисленных массива X и Y из 10 элементов.
Написать программу, которая подсчитывает и выдает на экран сумму x[i]*y[i].
...
sum:=0;
for i:=1 to 10 do
sum:=sum+x[i]*y[i];
writeln(sum);End.
Вы здесь » Форум школьного программирования , решение задач на турбо паскале , решебник по информатике » Решение задач на turbo pascal » Даны два целочисленных массива X и Y из 10 элементов.