Найти минимальное из трех чисел - Turbo Pascal

  1. Заданы три числа, надо найти минимальное число. Составить программу для вычисления периметра 10 прямоугольников.


textual

Код к задаче: «Найти минимальное из трех чисел - Turbo Pascal»

var
a,b,c,min:integer;
begin
write('a=');
read(a);
writeln;
write('b=');
read(b);
writeln;
write('c=');
read(c);
writeln;
min:=a;
if b<min then min:=b;
if c<min then min:=c;
writeln('min = ', min);
end.

СДЕЛАЙТЕ РЕПОСТ

14   голосов, оценка 4.214 из 5



Похожие ответы
  1. Задание собственно такое: Составить программу формирования из вектора A={ai}, i=1/3n вектора B={bi}, i=1/n, очередная компонента которого равна среднему арифметическому очередной тройки компонент вектора. вот сама программа:

  1. Два нечетных простых числа, разность между которыми равна 2, называются близнецами. На интервале от 1 до 1000 найти всех близнецов и подсчитать количество пар. Необходимо сделать ,используя только циклы ,а без функций и процедур я хз как(

  1. Ввести с клавиатуры двумерный массив из 9 чисел, подсчитать сумму элементов всего массива

  1. 1.Составить программу вычисления суммы квадратов чётных чисел из промежутка [a,b].

  1. Произвольно заданы три одномерных массива. Сформировать новый массив, состоящий из десяти элементов с наибольшими значениями исходных массивов. Помогите пожалуйста! Нужно написать программу с while и repeat!!!(отдельные)

  1. Задание: Даны три числа a, b, c. Составить программу нахождения значения минимального отклонения каждого из них от их среднего арифметического. Данные выбрать произвольно.

  1. нужна написать программу чтоб вышел такой рисунок *** ** *

  1. помогите пожалуйста написать программу,которая найдет все натуральные числа,меньше чем MAXINT, такие ,что они равны сумме факториалов цифр,из которых состоят. пример: 145=1!+4!+5!

  1. Написать программу на зыке Pascal для обработки матриц. Размерности матрицы и ее элементы должны вводиться с клавиатуры. Полученная матрица и другие элементы должны выводиться на экран. Определить произведение элементов в тех столбцах, которые не содержат элементов кратных 5.