Дан массив из 30 элементов. заполнить массив начиная с элемента a до элемента b двойками, а остальные элементы нулями и вывести весь массив на экран. известно, что 1< =a формат ввода вводятся 2 целых числа 1< =a формат вывода массив из 30 элементов пример ввод 2 10 вывод 0 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0

226

228

Посмотреть ответы 2

Ответы на вопрос:

NatashaShvecova

Информатика

4,7(88 оценок)

// pascalabc.net 3.2, сборка 1401 от 14.03.2017 // внимание! если программа не работает, обновите версию! 1. решение без проверки вводимых данных begin var a,b: integer; read(a,b); var p: =arrfill(30,0); for var i: =a-1 to b-1 do p[i]: =2; p.println end. пример 2 10 0 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2. решение с контролем ввода begin var a: =readinteger('введите a от 1 до 30: '); if a< 1 then begin writeln('неверно'); exit end; var b: =readinteger('введите b от '+a.tostring+' до 30: '); if (b< a) or (b> 30) then begin writeln('неверно'); exit end; var p: =arrfill(30,0); for var i: =a-1 to b-1 do p[i]: =2; p.println end. пример введите a от 1 до 30: 2 введите b от 2 до 30: 10 0 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0