Яне поняла тему.напишите программу, которая рассчитывает сумму за потребленную энергию по теущему показателю p2 и показателю месяца, с учетом тарифа - с руб/кват. если сумма превысит 1500 руб. вывести на экран "перерасход", если нет, то вывести "норма".(в паскале) заранее 70

ответ: Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».

Этапы создания текстового документа: ввод, редактирование, форматирование.

Информация во Всемирной паутине организована в виде страниц (Web-стран).

Объяснение: Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».

Этапы создания текстового документа: ввод, редактирование, форматирование.

Информация во Всемирной паутине организована в виде страниц (Web-страниц).

Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.иц).

Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
function FS(a,b:real):=0.5*a*b;
begin
  var a,b:real;
  Write('Катеты первого треугольника: '); Read(a,b);
  var S1:=FS(a,b);
  Write('Катеты второго треугольника: '); Read(a,b);
  var S2:=FS(a,b);
  if S1>S2 then Writeln('Площадь первого треугольника больше')
  else
    if S1<S2 then Writeln('Площадь второго треугольника больше')
  else Writeln('Площади треугольников равны')
end.

Тестовое решение
Катеты первого треугольника: 4.18 6
Катеты второго треугольника: 5.4 3.9
Площадь первого треугольника больше