Найти сумму заданных чисел и определить минимальное число

@Rorart · Регистрация: 03.11.2015

Author24 — интернет-сервис помощи студентам

Даны три числа a,b,c. Найти сумму a,b,c, min из трех.
(начертить блок- схему)

@CodeR · 11.11.2015, 13:25

Pascal

Var a,b,c,min:real;
Begin
    write('a,b,c: ');readln(a,b,c);
    writeln('Сумма = ',a+b+c:0:2);
    if a<b then min:=a
     else min:=b;
    if c<min then min:=c;
    writeln('Min  = ',min:0:2);
    readln;
End.

@Rorart 0 / 0 / 0 Регистрация: 03.11.2015 Сообщений: 5
		1
	Найти сумму заданных чисел и определить минимальное число 10.11.2015, 16:56. Показов 2421. Ответов 1 Метки нет (Все метки) Даны три числа a,b,c. Найти сумму a,b,c, min из трех. (начертить блок- схему) 0

	11.11.2015, 13:25

Найти сумму заданных чисел и определить минимальное число

Решение