ПОМОГИТЕ ПЕРЕВЕСТИ НА ПИТОН!
Татьяна в категроии Информатика, вопрос открыт 28.10.2017 в 22:19
var a,b,x,y,z:integer;// Генерирование примитивных триад, b - const
begin
write('введите b =');
readln(b);
a :=b+1;
repeat
x:=sqr(a)-sqr(b);
y:=2*a*b;
z:=sqr(a)+ sqr(b);
writeln('(',x,'; ',y,' ; ',z,'); (a=',a,'; b =',b, '); (', x/z:2:6, '; ',y/z:2:6,')');
a := a + 2;
until a>=500;
end.
0 ответов
Нет результатов.
Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.