НАРОД, помогите пожалуйста!! даны 3 числа а, в,с,если выполняется неравенство а< в <с, то напечатайте значение суммы, иначе значение
5-9 класс
|
произведения.
Program xxx;
uses crt;
var a,b,c:integer;
BEGIN
readln(a,b,c);
if ((a<b) and (b<c)) then
writeln(a+b+c) else
writeln(a*b*c);
END.
Другие вопросы из категории
Исполнителю Черепашке был дан для исполнения следующий алгоритм:
1010 внизу 2.112 внизу 8. 5c внизу 16
дана строка, содержащая символ ";". подсчитать кол-во символов до нее и после
Читайте также
Помогите пожалуйста составить программу Paskal.)))))))))))))
на языке Паскаля с помощью "while"
увеличить на 0,5; если оба значения неотрицательны и ни одно из них не пренадлежит отрезку [0.5;2,0], то оба значения уменьшить в 10 раз ; в остальных случаях x и y остаются без изменения . Помогите , завтра зачет.
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить среднее арифметическое вещественных чисел...
ПАСКАЛЬ,ПОМОГИТЕ ПОЖАЛУЙСТА