Question

1.Даны два действительных числа. Заменить первое число
нулем, если оно меньше или равно второму, и оставить числа без
изменения в противном случае.
2.Вводится последовательность из N членов. Определить
количество нулевых элементов.
3.Используя матрицу С(5,5), сформировать четыре одномерных
массива:
1-й – минимальные элементы строк матрицы;
2-й – номера столбцов соответствующих минимальных элементов;
3-й – максимальные элементы строк матрицы;
4-й – номера столбцов соответствующих максимальных элементов.
Начертить блок схемы и написать программы в DELPHI.
Помогите пожалуйста!!!!!!!!!!!!

Answer 1

Ответ:

var y,r:real; {описываем две переменные действительного типа} begin {старт алгоритма} read(y); {считывание входящих данных} read(r); if y<=r then y:=0; {сравниваем числа оператором 'if', если первое число меньше - тогда присваиваем ему значение "0"} writeln(y,' ',r); {вывод результата через пробел} end. {конец работы алгоритма}

Объяснение: