ТутРешу.Ру

Составить программу рассечата отнашения чисел а и б с округлением…

Задание:

Составить программу рассечата отнашения чисел а и б с округлением результата. ПоскальABC

Решение:

programm njknk; var a,b,c: real; beginreadln (a,b); if b<>0 then beginc: =a/b; writeln ('c',a: 10:0); end; else writeln ('error'); end.




Знаете другой ответ?

Отправить свой ответ