Проверьте, есть ли среди данных N чисел нули. Вводится число N, а затем N чисел....

July 2022 1 13 Report

Проверьте, есть ли среди данных N чисел нули. Вводится число N, а затем N чисел. Выведите YES, если среди введенных чисел есть хотя бы один нуль, или NO в противном случае.

Answers & Comments

Royal21 var
x, j, n, i: integer;
a: array [1..100] of string;
begin
write('Введите кол-во чисел: ');
read(n);
writeln('Введите числа: ');
for i := 1 to n + 1 do
begin
readln(A[i]);
for j := 1 to length(A[i]) do
if a[i][j] = '0' then inc(x);
end;
writeln('Кол-во нулей: ', x);
end.

0 votes Thanks 1

Royal21 Можно и так.

Royal21 Разница в том, что 0 может быть как отдельным числом, так и цифрой в составе числа.

Royal21 Ну это да, я не по теме немного =)

Answers & Comments

podskazhite gde cos xgtsin x

2...

shema ustrojstva politicheskoj vlasti v rf ispolnitelnaya zakonodatelnaya sude

h2d0f771324a098eb0220845b22192594 64004

vvoditsya chislon a zatemnchisel podschitajte skolko sredi dannyhnchisel nul

vychislite summu dannyh n naturalnyh chisel vvoditsya chislo n a zatem n chisel s

proverte pozhalujsta sochinenie po anglijskomu dear michael thank you for yo

pomogite pozhalujsta nado razbit predlozheniya po znacheniyu pridatochnoj chasti opr

chto takoe dekartova polyarnaya i sfericheskaya sistemy koordinat

za odin chas dve truby zapolnyayut bassejn na 45 esli pervaya truba budet otkryta

рекомендуемые вопросы

Helpful Links

Helpful Social