Информатика

Вопрос/Задача:

Паскаль абс! прошу! ! ! оче нужно! найдите массу почтового груза пассажирского самолета. фамилии пассажиров и масса багажа храняться в двух одномерных массивах. определите фамилии и кол-во пассажиров которые не имеют багажа.

Ответы на вопрос

Ответ
Ответ разместил: Гость

ответ:

int kv = (m-1)%3;

объяснение:

Ответ
Ответ разместил: Гость

1 simvol zanimaet 1 bait(tak kak imeem tekst);

tekst shpargalki sostavliaet 50*50=2500 simvolov-2500 bait.

da + eshe 0,3*2500=750.

vsego 2500+750=3250 bait.

Ответ
Ответ разместил: Гость

решение в фотографии:

Ответ
Ответ разместил: mardon1

пусть a(n) - фамилии, а b(n) - багажprogram samolet;

uses crt;

var a,b: array[1..n]of integer; i,n,k,s: integer;

begin

clrscr;

readln(n);

s: =0;

k: =0;

for i: =1 to n do s: =s+b[i];

for i: =1 to n do

if b[i]=0 then begin

writeln(a[i]);

k: =k+1;

end;

writeln('кол-во пассажиров без багажа - ',k);

readln;

end.

Похожие вопросы

Вопросы по предметам

Вопросов на сайте: