Универ soloBY
Для целочисленной квадратной матрицы найти число элементов, кратных k, и наибольший из этих элементов. (программа Паскаль)
Для целочисленной квадратной матрицы найти число элементов, кратных k, и наибольший из этих элементов.
спросил 1 час назад от cevka в категории ЕГЭ (школьный)
решение вопроса
0
uses crt;
const n=5;
var a:array[1..n,1..n]of integer;
i,j,max,k,t:integer;
begin
clrscr;
randomize;
writeln('Исходный массив');
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(100);
write(a[i,j]:3);
end;
writeln;
end;
write('K -> ');
readln(k);
max:=-1;
t:=0;
for i:=1 to n do for j:=1 to n do if a[i,j] mod k=0 then
begin
inc(t);
if a[i,j]>max then max:=a[i,j];
end;
write(k);
writeln('MAX=',max);
readln;
end.
РАЗЛИЧНЫЕ ВИДЫ КАКТУСОВ, ВЕРБЛЮЖЬИ КОЛЮЧКИ, АЛОЭ, ЛИТОПС, ПОЛЫНЬ, ОСОКА, КАРАГАЧ, САКСАУЛ.
Сентя́брь (лат. September — седьмой) — девятый месяц Григорианского календаря, один из четырёх григорианских месяцев с 30-ю днями. Сентябрь — начало осени в северном полушарии Земли и начало весны в южном.Название получил от лат. septem — семь, так как был седьмым месяцем староримского года, начинавшегося до реформы Цезаря с марта.<span>Древние славяне называли месяц сентябрь вересень (ср. белор. Верасень; укр. Вересень; польск. Wrzesień), от названия растения вереска, которое цветет в летне-осенний период.
</span>Октя́брь (лат. October — восьмой) — десятый месяц Григорианского календаря. Восьмой месяц староримского года, начинавшегося до реформы Цезаря с марта. Название получил от лат. octo — восемь.
Ноя́брь (лат. November — девятый) — одиннадцатый месяц Григорианского календаря. Девятый месяц староримского года, начинавшегося до реформы Цезаря с марта. Название получил от лат. novem<span> — девять. </span>
ОЗА ПИРЕНЕЕВ
<span>От тучи багровой
Очей не отвесть ей...
Ей слышатся зовы:
"Возмездье! Возмездье!"
Кровь мечется в жилах
И буйствует в сердце:
"За братьев, за милых!
За муку, за смерть их!"
И в диво кому же,
Что, вся пламенея,
Хватает оружье
Краса Пиренеев.
Как вестник отмщенья,
О пуля, домчись ты!
Нет лучше мишени,
Чем сердце фашиста!
Когда изуверы
Бомбили Мадрид твой,
О роза Сиерры,
Ты ринулась в битву.
И, гневом объята,
Разя без пощады,
Штыком и гранатой
Ты встретила гада.
Пусть гибели жало
Тебя не достанет,
Цвет губ твоих алых
Пусть вечно не вянет!
Пусть слово поэта
Хранит твою юность,
Чтоб в славе победы
Ты в сад свой вернулась!</span>
ПРИЗЫВ
<span>Питомцы сада, лучшего на свете,
Строители величественных дней!
Кто ближе сердцу матери, чем дети?
Кто вам отчизны-матери милей?..
И если драгоценнейшему благу -
Свободе нашей - угрожает враг,
В ком гневная не закипит отвага?
Ведь стоил крови каждый к счастью шаг!
Знавала наша родина немало
Бессмертием увенчанных побед;
Благоговейно молодежь внимала
Сказаниям и битвам прошлых лет.
Народ в своих неистощимых недрах
Выковывал таких богатырей,
Что шедший против нас надменный недруг
Невольно шел к погибели своей...
Не только за себя - за всех, чьей кровью
Злодей свою дорогу оросил,
За слезы матерей, за муку вдовью
Мы разочтемся, не жалея сил.
Смотрите: к небу, раздирая тучи,
Воздушные взмывают корабли!
Землетрясенья ль вал грядет ревучий? -
Нет, это наши танки в бой пошли.
Во вспененные глянете ль просторы:
Не за горой ли там скользит гора?
Нет, то советские дымят линкоры,
То наши выплывают крейсера!
От грома пушек вздрагивают скалы,
И долу клонятся верхушки рощ...
Кавказцы! И для нас пора настала
Явить и мужество свое и мощь!
Все - на коней! Взлетайте, братья, в седла
И устремляйтесь всем ветрам в обгон,
Чтоб заметался кровопийца подлый,
Поправший человечности закон.
Погибнет враг - мы в том клянемся честью!
Мир подвиг наш запомнит на века!
Нам путь победы, славы и возмездья
Предначертала партии рука!</span>
1941<span> </span>