Программирование линейных алгаритмов решите задачи:…

Программирование линейных алгаритмов решите задачи: 1. Дано число А число В в 2 раза больше вычеслите сумму числа целые.2. Определите частное целых чисел Х и У.3. Имеется участок прямоугольной фотмы со сторонами А и В определите Р участка. Делайти так чтоб там было: Program varBeginWriteLnReadLnEnd.

в избранное

wonderboy

25 февраля 2023

1. Program first; Uses Crt; var a, b: integer; begin Write ('Введите a'); ReadLn (a); b: =2*a; Write ('сумма a и b',a+b); end.2. Program second; Uses Crt; var a, b: integer; begin Write ('Введите a '); ReadLn (a); Write ('Введите b '); ReadLn (b); Writeln ('Частное a и b=',a div b); end.3. Program thrid; Uses Crt; var a, b: integer; begin Write ('Введите a '); ReadLn (a); Write ('Введите b '); ReadLn (b); Writeln ('Периметр=', (a+b)*2); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

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