сервис вопросов и ответовРешить задачу на языке программирования Pascal.
5-9 класс|
|
В текущем месяце бригада в каждый последующий день работы выпускала на три изделия больше, чем в предыдущий. В первый день было выпущено 42 изделия, что составило 67% дневной нормы. В месяце 26 рабочих дней. Сумеет ли бригада выполнить месячную норму?
Davidovairinka
27 июля 2014 г., 17:45:11 (9 лет назад)
Ganjuks
27 июля 2014 г., 19:09:27 (9 лет назад)
var i,x,s,n:integer;
begin
x:=42;
n:=round(42/67*100)*26;
for i:=1 to 26 do
begin
s:=s+x;
x:=x+3;
end;
writeln('Норма: ',n);
writeln('Сделано: ',s);
if s>=n then writeln('Норма выполнена')
else writeln('Норма не выполнена');
end.
Кристинаааа
27 июля 2014 г., 21:59:26 (9 лет назад)
var
i:integer;
answer:integer;
n:integer;
begin
answer:=42;
n:=Trunc(42/67)*100;
for i:=1 to 26 do
begin
answer:=answer+3;
if answer then Writeln(i,'Бригада не выполнила норму')
else Writeln(i,'Бригада выполнила норму');
end;
end.
Ответить
Другие вопросы из категории
Впишите из географического атласа в тетрадь названия пяти ефропейский государств в алфавитном порядке. Укажите
столицу каждого государства.
Читайте также
1.Какое значение переменной S будет напечатано после выполнения фрагмента программы,записанной на языке программирования TURBO PASCAL:A:=2В: = 3;
if A>B then S: = A+B;
writeln (S);
Варианты ответов:1)5 ;2)6; 3)7; 4)8
2. Какое значение переменной S будет напечатано после выполнения фрагмента программы, записанной на языке программирования PASCAL:
S: =1;
N: =1;
while N<=3 do
begin
S: = S*N;
N: = N+1;
end;
writeln(S);
Варианты ответов: 1)2 ; 2)1; 3)0; 4)4
Решить задачу на языке программирования Pascal:
Дано предложение в котором между словами 2 или несколько пробелов:"Мама моет Машу".
Сколько сочетаний букв "Ma" в предложении.
Помогите решить задачу на языке программирования в Turbo Pascal, плиз Начав тренировки, лыжник в первый день пробежал 10 км. Каждый следующий день он
увеличивал пробег на 10% от пробега предыдущего дня. Определить: а) ежедневное увеличение пробега лыжника за третий, четвёртый, ..десятый день тренировок; б) средний путь лыжника за первые 8 дней тренировок; в) сколько дней он будет бегать менее, чем по 15 км; г) в какой день суммарный пробег за все дни превысит 90 км.
Помогите, пожалуйста, решить задачу на языке программирования в Turbo Pascal: 1.Дан массив целых чисел, состоящий из 10 элементов.Заполнить его
с клавиатуры. Найти:
-Удвоенную сумму положительных элементов;
-вывести индексы тех элементов, значения которых больше значения предыдущего элемента(начиная со второго).
2.Определить,есть ли 2 пары соседних элементов с одинаковыми знаками.
Решить задачи на языке программирования в Turbo Pascal: 1) Дан массив, состоящий из 10 чисел, значения могут быть
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
Вы находитесь на странице вопроса "Решить задачу на языке программирования Pascal.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.