Домашние задания: Информатика

Информатика 8 класс

Поскольку язык программирования не указан, то я на своем
PascalABC.


Благо, там есть оператор обмена Swap (a, b);

Ну а если нет? То:
Александр Штефан
Александр Штефан
73 229
Лучший ответ
Александр Штефан А если нет такого оператора?
Тогда через третью переменную k (своеобразный буфер обмена):
k := a;
a := b;
b := k;

Ну а если обойтись двумя переменными:
a := a + b;
b : = a - b;
b : = a - b;
Кажется, что два одинаковых присваивания переменной... Но это только кажется. Попробуйте!
Программу, значит, написать... - Это можно. Только вот на каком языке программирования это нужно сделать? - Нет, программе-то, конечно, без разницы, на каком языке программирования (а их (языков программирования) существует порядка 40) она написана, а вот учитель/преподаватель может спросить, с чего это программа была написана на этом языке программирования, а не на том, который он(а) преподает.

Вот, например, на Pascal:
 Program P1; 
uses crt;
var a, b, c: real;
begin
clrscr;
writeln ('Введите с клавиатуры 3 числа (по 1). После ввода каждого из чисел нажимайте клавишу Enter. При вводе дробных значений целую часть от дробной отделяйте точкой, а не запятой.');
write ('Введите 1-ое число: ');
readln (a);
write ('Введите 2-ое число: ');
readln (b);
write ('Введите 3-е число: ');
readln (c);
writeln ('Сумма введенных чисел составляет: ', a+b+c :0:2);
writeln ('Разность введенных чисел составляет: ', a-b-c :0:2);
writeln ('Произведение введенных чисел составляет: ', a*b*c :0:2);
write ('Программа завершена. Для выхода нажмите клавишу Enter.');
readkey;
end.
Вот на Fortran:
 Program P1 
Real:: a, b, c
Print *, "Введите с клавиатуры 3 числа (по 1)."
Print *, "После ввода каждого из чисел нажимайте клавишу Enter."
Print *, "При вводе дробных значений целую часть от дробной"
Print *, "отделяйте точкой, а не запятой."
Print *, "Введите 1-ое число: "
Read *, a
Print *, "Введите 2-ое число: "
Read *, b
Print *, "Введите 3-е число: "
Read *, c
Print *, "Сумма введенных чисел составляет: ", a+b+c
Print *, "Разность введенных чисел составляет: ", a-b-c
Print *, "Произведение введенных чисел составляет: ", a*b*c
End Program P1
АМ
Алмас М
43 559