omraleva
?>

Выбери приёмники информации: Учитель в начале урока знакомит учеников с темой и целями урока. Затем ученики в командах проводят исследование и готовят презентацию. После чего каждая команда презентует свою работу.Верных ответов: 3ученикипрезентацияучительуказкапартатетрадь​

Информатика

Ответы

maksteks

ученики ,учитель ,презентация

Larisa-Andrei

Алгоритм такой:

1 шаг: определяем сколько мы получим денег за первые 75 газет.

Пусть n - всего газет, тогда (n-(n-75))*F = A, - рублей за первые 75 газет.

2 шаг: определяем кол.во копеек, которые мы получим за остальные газеты: (n-75)*X = B, - копеек.


Программа на естественном языке:

Переменные:

A, B : целые;

Начало

Введение n (число газет);

Введение F(цена за первые 75 газет);

Введение X(цена за последующие газеты);

A присвоить (n-(n-75))*F;

B присвоить (n-75)*X;

Вывод (Мальчик заработает A рублей B копеек).

Конец.

maruska90

Program Begenjov1997;

const

 n = 30; {Количество элементов массива}

 m = 10000; {Максимально возможное значение элемента}

var

 a:array[1..n] of integer;

 i, sum: integer;

 s:string;

begin

 s:=' -=Alphaeus=- ';

 for i:=1 to 22 do begin write(s[i]); sleep(60) end;

{заполняем массив случайными числами}

 writeln; randomize;

 for i:=1 to n do a[i]:=random(m+1);

{Ищем максимальный и минимальный элементы}

 sum:=0;

 for i:=1 to n do

   if (a[i]<200) and (a[i] mod 5 = 0) then sum:=sum+a[i];

{Заменяем эти элементы найденной суммой}

 for i:=1 to n do

   if (a[i]<200) and (a[i] mod 5 = 0) then a[i]:=sum;

{Вывод}

 writeln;

 for i:=1 to n do writeln(a[i]);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Выбери приёмники информации: Учитель в начале урока знакомит учеников с темой и целями урока. Затем ученики в командах проводят исследование и готовят презентацию. После чего каждая команда презентует свою работу.Верных ответов: 3ученикипрезентацияучительуказкапартатетрадь​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

vikabobkova2010
pak1998378
SlavaA99
tanyamurashova11352
radatailless
lepekhov4011
zaschitin48
steger
kulikovtsud
filimon211
volkovaoksana19806037
ksenyabobrovich7214
sgritsaev
lazu8375
Виталий_Ильназ574