lesson226 L lesson226 Регистрация 8 Сен 2013 Сообщения 86 Репутация 0 Спасибо 1 Монет 0 8 Май 2018 #1 Исправьте программу в паскале var a b c: integer; real begin writeln(a,b) readln; c=sqrt(a+b) writeln(c) end
Исправьте программу в паскале var a b c: integer; real begin writeln(a,b) readln; c=sqrt(a+b) writeln(c) end
utug20010104 U utug20010104 Регистрация 3 Май 2013 Сообщения 88 Репутация 0 Спасибо 0 Монет 0 8 Май 2018 #2 примерно так давненько не пользовался паскалем и компелятора под рукой нет проверить. var a, b : integer; c: real; begin write("введите "a "); readln(a); write("введите "b "); readln(b); c=sqrt(a+b); writeln(c); end. Позитивный голос 0
примерно так давненько не пользовался паскалем и компелятора под рукой нет проверить. var a, b : integer; c: real; begin write("введите "a "); readln(a); write("введите "b "); readln(b); c=sqrt(a+b); writeln(c); end.
westler W westler Регистрация 9 Дек 2013 Сообщения 79 Репутация -3 Спасибо 0 Монет 0 8 Май 2018 #3 Уж лучше бы дали задачу просто типа "Найти корень суммы целых чисел на паскале" А не вот это вот все Позитивный голос 0
Jarkom J Jarkom Регистрация 1 Июн 2013 Сообщения 93 Репутация 0 Спасибо 0 Монет 0 8 Май 2018 #4 что исправлять? все правильно Позитивный голос 0
KykJIa K KykJIa Регистрация 16 Окт 2013 Сообщения 91 Репутация 1 Спасибо 0 Монет 0 8 Май 2018 #5 Много лишнего кода! Позитивный голос 0