84

Помогите пожалуйста очень прошу вас добрые вы люди.…

mynamereal 01 марта 2023

Помогите пожалуйста очень прошу вас добрые вы люди. -. Даны три числа a,b,c если они положительные то найти их сумму, а если отрицательные то поменятьзнаки и затем найти сумму Помогите алгоритм составить в Паскале.

категория: информатика

98

programm New1; var a, b, c: integer; beginWriteln ('Ввод а,b,c,sum'); Readln (a,b,c); if a<0 then a: =-a; if b<0 then b: =-b; if c<0 then c: =-c; sum: =a+b+c; Writeln (sum); readln; end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...