Notice: Функция _load_textdomain_just_in_time вызвана неправильно. Загрузка перевода для домена kirki была запущена слишком рано. Обычно это индикатор того, что какой-то код в плагине или теме запускается слишком рано. Переводы должны загружаться при выполнении действия init или позже. Дополнительную информацию можно найти на странице «Отладка в WordPress». (Это сообщение было добавлено в версии 6.7.0.) in /home/hwor/blagovest.org.ru/wp-includes/functions.php on line 6114

Notice: Функция _load_textdomain_just_in_time вызвана неправильно. Загрузка перевода для домена shamrock была запущена слишком рано. Обычно это индикатор того, что какой-то код в плагине или теме запускается слишком рано. Переводы должны загружаться при выполнении действия init или позже. Дополнительную информацию можно найти на странице «Отладка в WordPress». (Это сообщение было добавлено в версии 6.7.0.) in /home/hwor/blagovest.org.ru/wp-includes/functions.php on line 6114

Warning: Cannot modify header information - headers already sent by (output started at /home/hwor/blagovest.org.ru/wp-includes/functions.php:6114) in /home/hwor/blagovest.org.ru/wp-includes/feed-rss2.php on line 8
paskal — Ответы на популярные вопросы — blagovest https://blagovest.org.ru Задайте вопрос и получите ответ Sun, 03 Jan 2016 12:55:54 +0000 ru-RU hourly 1 https://wordpress.org/?v=6.7.2 Где ошибка в paskal ? https://blagovest.org.ru/?p=97115 https://blagovest.org.ru/?p=97115#comments Sun, 03 Jan 2016 12:55:54 +0000 http://blagovest.org.ru/?p=97115 Задача:  Дано  координати  двох  протилежних  вершин  прямокутника  (x1 ,y1  )  і  (x 2,y2  ).  Сторони прямокутника а і b паралельні осям координат. Знайти периметр Р  и площу S даного прямокутника, спочатку обчисливши довжини сторін а і b за формулами: а=|x2– x1|, b=|y2 – у1|.

Вот мое решение:
program n_4_25;
Uses WinCRT;
var
  x1,x2,y1,y2,a,b,p,s:real;
begin;
WriteLn(‘Vvedite x1 i y1:’);
ReadLn(x1,y1);
WriteLn(‘Vvedite x2 i y2’);
ReadLn(x2,y2);
a:=abs(x2-x1);
WriteLn(‘a=’,a);
b:=abs(y2)-abs(y1);
WriteLn(‘b=’a);
p:=2*(a+b);
WriteLn(‘p=’p);
s:=a*b;
WriteLn(‘s=’s);
ReadLn
End.

Где ошибка?

Добавлено….
Даны координаты двух противоположных вершин прямоугольника (x1 ,y1) и (x 2,y2 ) Стороны прямоугольника а и b  параллельные осям координат. НАйти периметр P и площадь S данного прямоугольника, но с начала нужно посчитать  длины сторон а и b по формулам а=|x2– x1|, b=|y2 – у1|

]]>
https://blagovest.org.ru/?feed=rss2&p=97115 2