2 пример-Программы с ветвлением if else
2 пример-
Программы с циклом for

Program P1;
uses crt;
var k, x: real;
begin
clrscr;
writeln ('Введите с клавиатуры значения переменных k и x (только числа). После ввода значения каждой из переменных нажимайте клавишу Enter. При вводе дробных значений целую часть от дробной отделяйте точкой, а не запятой.');
write ('Введите значение переменной k: k=');
readln (k);
write ('Введите значение переменной x: x=');
readln (x);
if (k=0) and (x=0) then writeln ('Ошибка: происходит деление на 0.') else writeln ('Ответ: y=', (k*sqr (x))/abs (5*sqr (x)+6*k) :0:2);
write ('Программа завершена. Для выхода нажмите клавишу Enter.');
readkey;
end.
Вот на Python: print ("Введите с клавиатуры значения переменных k и x (только числа). После ввода значения каждой из переменных нажимайте клавишу Enter. При вводе дробных значений целую часть от дробной отделяйте точкой, а не запятой.")
k=float (input ("Введите значение переменной k: k="))
x=float (input ("Введите значение переменной x: x="))
if k==0 and x==0:
print ("Ошибка: происходит деление на 0.")
else:
print ("Ответ: y =", (k*x**2)/abs (5*x**2+6*k))
Вот на C++: #include
#include
using namespace std;
int main()
{
setlocale (LC_ALL, "RUS");
double k, x;
cout
Вот на Fortran: BASIC и Java я не знаю, а на АЛГОЛе, пожалуй, писать не буду - и так достаточно, как по-мне. Если что - уже в комментариях по просьбам учащихся.