Регистрация
putnikputen
12.11.2021 13:22
Информатика
Есть ответ 👍

дополнить программу Нужно чтобы после окончания работы программа спросила :
"Желаете ли вы закончить работу?"

Program ploshad;
var a,b,c:real;
begin
write('Введите значение a= ');
readln(a);
write('Введите значение b= ');
readln(b);
If (a<=0)or(b<=0) then
write('Сторона не может быть отрицательной, либо равна нулю')
else
c:=a*b;
writeln('Площадь квадрата, с заданными параметрами равна - ',c);
c:=a*b/2;
writeln('Площадь прямоугольного треугольника, с заданными параметрами равна - ',c);
repeat

249
371
Посмотреть ответы 1

Ответы на вопрос:

ooolyyya2001
ooolyyya2001
4,4(10 оценок)
Все профессии человека. если я правильно поняла

Популярно: Информатика