Нужно составить программу (на языке Паскаль) для определения значения выражения y=√a+|b|+(15+c)²
Ответы
                                            Ответ дал: 
                                                                                    
                                        
                                            
                                                
                                                
                                                
                                                    0
                                                
                                            
                                        
                                    var a,b,c,y:Real;
Begin
Read(a,b,c);
y:=SQRT(a+ABS(b)+(15+c)*(15+c));
Write(y)
End.
                                            Ответ дал: 
                                                                                    
                                        
                                            
                                                
                                                
                                                
                                                    0
                                                
                                            
                                        
                                    
                                        Программка немного неверная, подправил, теперь значнеие правильное
                                    
                                        
                                        
                                
                                            Ответ дал: 
                                                                                    
                                        
                                            
                                                
                                                
                                                
                                                    0
                                                
                                            
                                        
                                    
                                        var a,b,c,y:real;
Begin
Readln(a,b,c);
y:=SQRT(a)+ABS(b)+SQR(15+c);
Writeln(y)
End.
                                        
                                        
                                Begin
Readln(a,b,c);
y:=SQRT(a)+ABS(b)+SQR(15+c);
Writeln(y)
End.
Вас заинтересует
                
                        2 года назад
                    
                
                        2 года назад
                    
                
                        3 года назад
                    
                
                        9 лет назад
                    
                
                        9 лет назад