Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

Data 0, 0, 0, 0, 0



Для вывода исходных данных и результатов их обработки можно воспользоваться следующим сценарием:

Матрица А<n><n>:

11>... <a1n>

… … …

<anl> … <ann>

Число нулей в столбцах:

<d1>... <dn>

Решением поставленной задачи на ЭВМ можно получить с помо­щью следующего алгоритма и программа на языке Бейсик. Обратите внимание в программе используются массивы переменной длины, которая определяется при вводе размеров матрицы А:

' подсчет нулевых столбцов ' алг «подсчет нулевых столбцов»

' в квадратной матрице Ann ' нач

read n ' чтение(п)

dim A(n,n), D(n) ' массивы А(1:п,1:п), D(1:n)

print «Матрица A»;n;n;«:» ' вывод («Матрица А»;п;п; «:»)

for k = 1 to n ' от k = 1 до п цикл

for 1 =1 to n ' от l =1 до п цикл

read A(k,l) ' чтение A(k,l)

print A(k,l) ' вывод A(k,l)

next 1 ' кцикл

next k ' кцикл

for k = 1 to n ' om k= 1 до п цикл

D(k) = 0 ' D(k) = 0

for 1 = 1 to n ' от l=1 до п цикл

if A(k, l) = 0 then ' если A(k, l) = 0 то

D(k) = D(k) + 1 ' D(k) = D(k) + 1

end if ' кесли

next 1 ' кцикл

print D(k); ' вывод D(k);

next k ' кцикл

end ' кон

Задача 2. Дана строка символов. Распечатать все слова нечетной длины, отличные от второго слова.

(В этой задаче «словом» называется группа символов, разделен­ная с одной или обеих сторон одним или несколькими пробелами и не содержащую внутри себя пробелов.)

Пример строки





Дата публикования: 2014-10-25; Прочитано: 636 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.007 с)...