Дано целое число N. Найти квадрат этого числа, используя формулу приближенного вычисления , проверить результат, вычислив и записав рядом с приближенным значением l N^2=1+3+5...+(2N-1)делать через repid,until
Из Истории - 1) Наполеон Бонапарт - французский государственный деятель. 2) Христофор Колумб - открыл новый свет. Из Географии - 1) Россия - самое большое государство по площади. 2) В Китае больше всего населения. Из биологии - 1) Растения производят кислород. 2) У коровы есть вымя. Из математики - 1) 2+2=4 2) 6-2=4 Из Русского языка - 1) В русском алфавите - 32 буквы. 2) В сложном предложении 2 грамматические основы. Из Литературы - 1) А.С. Пушкин - русский поэт. 2) "Войну и Мир" Написал Л.Н. Толстой. Из информатики - 1) Информатика - наука о работе с информацией. 2) Вирт Никлаус - специалист в области информатки.
Program qq; uses crt; var p, d, z, i: integer; k:real; begin writeln('Введите период для отрастания травы в днях:'); readln(p); writeln('Введите потребное количество загонов:'); readln(z); for i:=1 to 5 do begin d:=i; // переменная дней изменяется, как дано в условии от 1 до 5 дней k:=round(p/d+z); //процедура round округляет по всем правилам число загонов. Ведь весьма нелогично строить, например 3,3333 загона:) writeln ('Для количества дней пастьбы - ', d,' требуется загонов - ',k); end; end.
1) Наполеон Бонапарт - французский государственный деятель.
2) Христофор Колумб - открыл новый свет.
Из Географии -
1) Россия - самое большое государство по площади.
2) В Китае больше всего населения.
Из биологии -
1) Растения производят кислород.
2) У коровы есть вымя.
Из математики -
1) 2+2=4
2) 6-2=4
Из Русского языка -
1) В русском алфавите - 32 буквы.
2) В сложном предложении 2 грамматические основы.
Из Литературы -
1) А.С. Пушкин - русский поэт.
2) "Войну и Мир" Написал Л.Н. Толстой.
Из информатики -
1) Информатика - наука о работе с информацией.
2) Вирт Никлаус - специалист в области информатки.
uses crt;
var p, d, z, i: integer; k:real;
begin
writeln('Введите период для отрастания травы в днях:');
readln(p);
writeln('Введите потребное количество загонов:');
readln(z);
for i:=1 to 5 do
begin
d:=i; // переменная дней изменяется, как дано в условии от 1 до 5 дней
k:=round(p/d+z); //процедура round округляет по всем правилам число загонов. Ведь весьма нелогично строить, например 3,3333 загона:)
writeln ('Для количества дней пастьбы - ', d,' требуется загонов - ',k);
end;
end.