Определить среднее арифметическое двух чисел, если a положительное, в противном ...

August 2022 1 28 Report

Определить среднее арифметическое двух чисел, если a положительное, в противном случае найти частное этих чисел.
Помогите пожалуйста, ДАЮ 90 БАЛЛОВ!!!

Answers & Comments

HappyCoder

var a,b,c:integer;

begin

Writeln('Введите два числа: ');

Read(a,b);

if a>0 then

Writeln('Среднее арифметическое: ', (a+b)/2)

else Writeln('Частность: ', a/b);

end.

5 votes Thanks 11

Tomtit8 Спасибо большое!!!

HappyCoder Не за что)

Tomtit8 else где writeln, его обязательно писать в Паскаль

HappyCoder Это констуркция if then else т.е ЕСЛИ выполняется условие ТО ... Иначе

HappyCoder Иначе выполняем другое выражание

uprugo deformirovannuyu pruzhinu zamenili na druguyu pruzhinu u kotoroj zhyostkost v

Answer

Answers & Comments

uprugo deformirovannuyu pruzhinu zamenili na druguyu pruzhinu u kotoroj zhyostkost v

рекомендуемые вопросы

Helpful Links

Helpful Social