Предмет: Информатика,
автор: kaemelyanowa
Составить программу, вставляющую перед каждой цифрой 0 в исходной строке слово "zero"
Ответы
Автор ответа:
1
Ответ:
program zadacha;
var
a:array[1..100] of integer;
i,n:integer;
begin
writeln('Введите размерность массива:');readln(n);
write ('Введите элементы массива:');
for i := 1 to n do read (a[i]);;
writeln ('Результаты:');
for i:=1 to n do
if (a[i]=0) then write('zero ',a[i],', ')
else write (a[i],', ');
end.
Проверка компилятора в скриншоте.
Приложения:
![](https://files.topotvet.com/i/b93/b933d3a790ff65b0d93041cf6bb38ac3.png)
Похожие вопросы
Предмет: Обществознание,
автор: kipich11
Предмет: Обществознание,
автор: Семченкова
Предмет: Английский язык,
автор: ArtMuR
Предмет: Геометрия,
автор: олесякомина
Предмет: Математика,
автор: Cheriswood