Var mas: array [1..10] of integer; k,i: integer; begin for i: =1 to 10 do k: =0; readln(a[i]); k: =k+a[i]; writeln(a[i] '+'); write(k); end. где ошибка? !
XxXKotikXxX
2
10.09.2019 21:40
0
Другие вопросы по теме Информатика
DarkWolf100
17.07.2019 15:10
MichiChi
17.07.2019 15:10
eka04599
24.06.2020 15:03
Viper397
24.06.2020 15:23
AlexPomanov
24.06.2020 15:27
esaloverzhan
24.06.2020 15:25
katyaDarsht
25.06.2020 15:34
Kotenok052000
19.05.2020 11:25
Winx1209
19.05.2021 16:15
Популярные вопросы
- Выписать отрывки стихотворений, в которых есть слова с полногласными и/или неполногласными...
3 - Задания суммативного оценивания за 1 четверть по предмету «История Казахстана»Задание...
3 - умоляю вас люди которые надо сдать до 13 25 а у меня час умоляю вас люди добрые...
2 - Орфографиялық нормаға сай сөзді табыңыз....
2 - Төле би Қоңқа қарттан қандай тәрім алды? Надеюс для вас это будет легким мне сложноватенко...
1 - Написать сочинение описание памятника Пушкина...
1 - 1. Прочитайте. Выпишите выделенные слова. Подберите там, где это возможно, сино-...
3 - -6-(+8,1);-5-(+6,7);-8-(+9,5);Решите...
3 - Ра и 182A. Прочитайте текст, составьте его план. Опишите светлую, чи-стую, бескорыстную...
3 - Вычислить и вывести на экран в виде таблицы значения функции, заданной графически...
1
k,i:integer;
begin
for i:=1 to 10 do
k:=0;
readln(mas[i]);
k:=k+mas[i];
writeln(mas[i] ,'+');
write(k);
end.