с заданиями по информатике 1.Задан двумерный целочисленный массив B из n строк и m столбцов (1 ≤ n, m ≤ 10). На одном из языков программирования (Pascal, C++, Python, алгоритмический язык) cоставить программу, которая которая организует одномерный массив С, элементы которого равны количеству положительных элементов в строке исходного массива В.

2. Задан двумерный целочисленный массив L размера n × n (1 ≤ n ≤ 10). На одном из языков программирования (Pascal, C++, Python, алгоритмический язык) для каждого столбца определить сумму тех двух элементов, которые принадлежат главной и побочной диагоналям.

3. Известный исследователь, устав от долгого путешествия по джунглям, лег спать в 10 часов вечера. Перед этим он завел будильник на 12 часов следующего дня. К сожалению, проспать 14 часов ему не удалось, так как будильник зазвонил уже через 2 часа. Исследователь забыл, что на будильнике, имеющем 12-ти часовой циферблат, можно задать время до звонка только менее 12 часов. Требуется написать программу, которая определяет, сколько часов успеет проспать исследователь, прежде чем будильник его разбудит. Описание входных данных Входные данные вводятся с клавиатуры или из файла input.txt. В единственной строке записаны два целых числа S и T (1 ≤ S, T ≤ 12), разделенные одним пробелом – час, когда исследователь лег спать, и час, на который он установил будильник. Описание выходных данных Выходные данные выводятся на экран или в файл output.txt. В единственной строке необходимо вывести одно целое число – через сколько часов зазвонит будильник.

296

380

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

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

ShHanddW

Информатика

4,4(64 оценок)

Varn,a,b,i,max: integer; beginwriteln('vvedite kol-vo chisel n'); readln(n); max: =0; for i: =1 to n dobeginwriteln('vvedite ',i,' chislo'); readln(a); if max = a theninc(b); if max < a thenmax: =a; end; writeln('max=',max); writeln('количество елементов которые равны максимуму ',b); end.