Предмет: Информатика,
автор: Robokop06
С1. Составить алгоритм
и написать программу на вычисление площади или периметра прямоугольника
, при условии, если а < b ,
тогда вычисляем периметр , иначе площадь . Каждую строку программы прокомментировать .
Входные данные а=10 , b=8
помогите решить 9 класс
Ответы
Автор ответа:
0
Более красивый вариант)
Program N_1; //Название программы
Var a,b,c:integer; //Переменные
BEGIN
Writeln('Введите длину и ширину прямоугольника'); //Вывести данную строку
readln(a,b); //Считать a и b
if a<b //Если a<b
then begin //то найти периметр
c:=(a+b)*2;
Writeln('Пириметр= ',c) //и вывести его
end
else begin //Если a>b
c:=a*b; //то найти площадь
writeln('Площадь= ',c) //и вывести ее.
end;
END.
Program N_1; //Название программы
Var a,b,c:integer; //Переменные
BEGIN
Writeln('Введите длину и ширину прямоугольника'); //Вывести данную строку
readln(a,b); //Считать a и b
if a<b //Если a<b
then begin //то найти периметр
c:=(a+b)*2;
Writeln('Пириметр= ',c) //и вывести его
end
else begin //Если a>b
c:=a*b; //то найти площадь
writeln('Площадь= ',c) //и вывести ее.
end;
END.
Автор ответа:
0
Это на паскале
Похожие вопросы
Предмет: История,
автор: MaksDobrovsky
Предмет: Английский язык,
автор: malikashalikhova
Предмет: Математика,
автор: tafeyoj934
Предмет: География,
автор: elizaveta72305
Предмет: Алгебра,
автор: КатяСухорукова