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

Информатика 10 класс, помощь нужна срочно

1 Пример-Линейные программы
2 пример-Программы с ветвлением if else
2 пример-
Программы с циклом for
Программу, значит, написать... - Это можно. Только вот на каком языке программирования это нужно сделать? - Нет, программе-то, конечно, без разницы, на каком языке программирования (а их (языков программирования) существует порядка 40) она написана, а вот учитель/преподаватель может спросить, с чего это программа была написана на этом языке программирования, а не на том, который он(а) преподает.

Пишу только 1-ое задание - остальные же - как определитесь с языком программирования в комменттариях.

Вот, например, на Pascal:
 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
ЕП
Евгений Папирненко
43 559
Лучший ответ
Евгений Папирненко Продолжаю:

Вот на Fortran:
 Program P1 
Real k, x
Write (*,*) "Введите с клавиатуры значения переменных k и x (только числа)."
Write (*,*) "После ввода значения каждой из переменных нажимайте клавишу Enter."
Write (*,*) "При вводе дробных значений"
Write (*,*) "целую часть от дробной отделяйте точкой, а не запятой."
Write (*,*) "Введите значение переменной k: k="
Read *, k
Write (*,*) "Введите значение переменной x: x="
Read *, x
if (k==0 .and. x==0) then
Write (*,*) "Ошибка: происходит деление на 0."
else
Write (*,*) "Ответ: y=", (k*x**2)/abs (5*x**2+6*k)
end if
End Program P1
BASIC и Java я не знаю, а на АЛГОЛе, пожалуй, писать не буду - и так достаточно, как по-мне. Если что - уже в комментариях по просьбам учащихся.
Алексей Викторович Паскаль скорее всего, просто я много пропускал, из за этого не знаю
Евгений Папирненко 2-ой пример на C:
 #include  
#include
int main()
{
printf ("x1=%lf", (-1-sqrt (33))/2);
printf ("; x2=%lf", (-1+sqrt (33))/2);
printf ("; y1=%lf", (1-(-1-sqrt (33))/2)/2);
printf ("; y2=%lf", (1-(-1+sqrt (33))/2)/2);
printf ("\nПрограмма завершена. Для выхода нажмите клавишу Enter.");
getchar ();
return 0;
}