Имеется четыре A,B,C,D произвольных числа. ЭВМ должна ответить на вопрос правда ли что первое число самое маленькое, а последнее самое большое? Составить
10-11 класс
|
блок-схему и программу решения задачи
var a,b,c,d:Real;
T:Boolean;
Begin
randomize;
a:=random(50);
b:=random(50);
c:=random(50);
d:=random(50);
writeln('A=',a,' ','B=',b,' ' 'C=',c,' ','D=',d);
T:=(a<b)and(a<c)and(a<c)and(d>a)and(d>b)and(d>c);
writeln(T);
End.
Другие вопросы из категории
на самое последнее место.
Группа файлов
1)cabinda.xls
2) cubic.xlsx
3) irbic.xls
4) tobias.xls
Маски
1) ??bi*.xls
2) ??bi*.xls*
3) **bi*.xls*
4) ??bi*.x*
Пожалуйста поподробнее. Заранее спасибо
Читайте также
последнее самое маленькое? Ответ ЭВМ должна вывести в виде текста-"Правда" или "Неправда"
виде текста : правда , неправда
остальных" c циклами while repeat
написать программу, которая отвечает на вопрос " существуют ли два последовательных числа, не превосходящих N, сумма цифр каждого из которых делится на k?"
Входные данные: Два числа N(1<=N<=10000000000),k (1<=k<=100)
Выходные данные: Программа выводит два таких числа, если они существуют,"NO"- если нет.