Вопрос Исправьте программу в паскале var a b c: integer; real begin writeln(a,b) readln; c=sqrt(a+b) writel

Регистрация
8 Сен 2013
Сообщения
77
Репутация
0
Спасибо
1
Монет
0
Исправьте программу в паскале var a b c: integer; real begin writeln(a,b) readln; c=sqrt(a+b) writeln(c) end
 
примерно так давненько не пользовался паскалем и компелятора под рукой нет проверить. var a, b : integer; c: real; begin write("введите "a "); readln(a); write("введите "b "); readln(b); c=sqrt(a+b); writeln(c); end.
 
Уж лучше бы дали задачу просто типа "Найти корень суммы целых чисел на паскале" А не вот это вот все :D
 
Много лишнего кода!
34182886_c61e1e7a3a320146646457805e8f10b3_800.jpg
 
Назад
Сверху