Cоставить программу на языке программирования, осуществляющую сортировку значений трех переменных А, В, С по возрастанию. Проверить программу
5-9 класс
|
на тестах при разных вариантах значений исходных данных.
procedure abc(var a,b:real);
var x:real;
begin
x:=a;
a:=b;
b:=x;
end;
var a,b,c:real;
begin
writeln('Vvedite a,b,c');
readln(a,b,c);
if a>b then abc(a,b);
if b>c then abc(b,c);
if a>b then abc(a,b);
write(a,' ',b,' ',c);
end.
Другие вопросы из категории
2.Эволюция графического редактора – начиная от самого простого (например, Paint) до профессионального (например, Photoshop) и объяснить, как развивались программы, для каких задач нужна каждая из них и каковы их особенности.
Даю 30 баллов.
дискретизации- 44000, разрядность – 16 битов). Какова максимальная
продолжительность стереозаписи на диске емкостью 700Мбайт?
Читайте также
if A>B then S: = A+B;
writeln (S);
Варианты ответов:1)5 ;2)6; 3)7; 4)8
2. Какое значение переменной S будет напечатано после выполнения фрагмента программы, записанной на языке программирования PASCAL:
S: =1;
N: =1;
while N<=3 do
begin
S: = S*N;
N: = N+1;
end;
writeln(S);
Варианты ответов: 1)2 ; 2)1; 3)0; 4)4
а)2,136+2/3y
б)(x-5)+a/3ax
Например:
Математическая запись: Запись на языке программирования:
a+3b-2c (a+3 умножить на b-2 умножить на c):(7 умножить на a+2)
Срочно!
ЗАДАЧА - Составить программу решения задачи: Z = m/(m-1)
ЗАДАЧА - Составить программу определения четных (нечетных) чисел
Перевод дюймов в сантиметры (1дюйм=2,54см). Нужно, чтобы при запуске программы на экране выходило в два столбика дюймы и сколько это будет сантиметров. До 20 чисел. Через оператор While.
радиуса R ввести с клавиатуры), полученный ответ вывести на экран.