Количество символов в реферате:
12*48*64+12*24*32
Объем реферата:
(12*48*64+12*24*32)*2 байт = (<span>12*48*64+12*24*32)*2/1024 Кбайт = 90 Кбайт</span>
Ранним утром, воробей пролетел мимо леса. Но услышав всхлипы животного , он полетел на звук. Летел он , летел и видит , заяц сидит на земле и плачет.
- "Что случилось заяц?" - спрашивает он.
- "Да вот , потерялся я , всю ночь по лесу бродил, не могу выбраться."
- "Ну, чего ты, не горюй. Помогу я тебе дом найти , ты только скажи где ты обитаешь и как домик то твой выглядит?"
- " Мой дом с красной крышей , сам синий , а рядом морковки лежат "
-"Так, хорошо , жди здесь и не уходи, я скоро прилечу."
-"Хорошо "
Тем временем воробей уже во всю старался найти домик зайца, спрашивал у животных , букашек. Но никто не знал , где находиться зайкин дом.
Но уже ближе к вечеру , он увидел красную крышу , а потом и морковки. На радостях он полетел к зайке.
-"Зайка, зайка!"-звал он его .
-" Воробей , это ты ? Я здесь !"
- "Я нашёл , пойдём скорей "
И спустя некоторое время они пришли к домику зайки. Он его поблагодарил и пригласил на чай , о воробей сказал ему больше не теряться. Так теперь они и живут вместе и помогают друг другу
ОТДЫХАЮ,ИГРАЮ,ЗАНИМАЮСЬ УРОКАМИ,ЕМ,СПЛЮ,ГУЛЯЮ,ИГРАЮ.
Var x:real;
begin
x := -4;
while x <= 4 do begin
writeln('x=',x : 2 : 2,' y=', abs(x-2)+abs(x+1) : 2 : 2);
x := x + 0.5;
end;
readln; //задержка ввода
end.
Program zadacha;
var a1,a26, norm1,norm26,S, d: real;
n:integer;
begin
a1:=42;
d:=3;
n:=26;
norm1:=round(a1*100/67);//найдем дневную норму и округлим ее
a26:= a1+d*(n-1);//бригада выполнит в 26-й день, 26-й член арифметической прогрессии, где разность=3
norm26:= norm1*n;//найдем норму за 26 рабочих дней
S:= (a1+a26)*26/2;//сумма 26-сти членов арифметической прогрессии, все изделия за 26 дней
//вывод на экран промежуточных вычислений не обязателен
writeln ('норма за один день = ',norm1);
writeln ('изделий в 26-й день = ',a26);
writeln ('норма за 26 дней = ',norm26);
writeln ('всего изделий за 26 дней = ',S);
if S >= norm26 then
writeln ('бригада выполнит месячную норму')
else
writeln ('бригада не выполнит месячную норму');
end.
//В вашем условии m - это норма за месяц, т.е. за 26 рабочих дней