помогите решить задачу по информатики, вот условие и фото с введенными значениями ,, Дан массив целых чисел (3,4) найти сумму всех элементов массива,,
5-9 класс
|
нужно написать программу дописать алгоритм
var a:array[1..3,1..4] of integer; s,i,j:integer;
begin
s:=0;
for i:=1 to 3 do begin
for j:=1 to 4 do begin
read(a[i,j]); read; s:=s+a[i,j]; end;
writeln; end;
writeln(s);
end.
блок схему пожалуйста
Другие вопросы из категории
км=1024м,1м=64см,1мин=128с .Вася считает ,что способен побить олимпийский рекорд на стометровке ,если будет бежать с той же скоростью ,что и километровую, по мнению Васи ,дистанцию.За сколько реальных секунд Вася пробегает 100м?
Ответ округлить до целых
Читайте также
Задача: Две
хозяйки купили 8 литров молока. У одной 5 литров в 6- литровом бидоне, у
другой 3 литра в 5 - литровом бидоне. Они решили разделить всё молоко
поровну, по 4 литра, пользуясь ещё одним, 2 - литровом бидоном. Как это
сделать?
реку.В их распоряжении есть маленькая лодка, вмещающая только одного взрослого или двоих детей.Как организовать переправу если и взрослые и дети умеют грести?
Маша набирает текст со скоростью 40 символов в минуту,а Катя- 20 символов в минуту.Через какое время девочки введут одинаковое количество символов,если Катя начала набирать текст на 5 минут раньше?
Нужно решить без x! Спасибо
Сообщение занимает 4 страницы по 40 строк и содержит 720 байтов информации.Сколько символов в строке,если при составлении этого сообщения использовали 64-символьный алфавит.
Заранее благодарна!
1. Дано 2 числа найти модуль разности этих чисел увеличенный в 5 раз.
2. Дано 4 значное число поменять местами 1 и 2 цифру местами
3. Дан диаметр круга найти его площадь (формула S=п*R).
Я примерно знаю как писать но всеровно нуждаюсь в помощи
Мои мысли:
program z1;
uses crt;
var ... : integer;
begin
дальше всё в тумане
буду рад за решённые 1 или 2 задачи