Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
type
person=record
fam: string;
imya: string;
day: integer;
end;
var
a: array[1..50] of person;
i,n,z: integer;
begin
write('n='); readln(n);
for i: =1 to n do
write('fam-'); readln(a[i].fam);
write('imya-'); readln(a[i].imya);
write('day-'); readln(a[i].day);
write('z-'); readln(z);
if a[i].day=z then writeln (a[i].fam, ' ',a[i].imya);
readln;
end.
смотря откуда эта формула и как вы ее применяете
похоже, что пи - просто функция без аргументов, т.е. ничего ставить не надо
a: array [1..20] of integer;
i,max: integer;
max: =0;
for i: =1 to 20 do
if i mod 2=0 then a[i]: =random(50)+50
else a[i]: =random(50)+150;
if a[i]> max then max: =a[i];
write(a[i]: 4);
writeln;
writeln('max=',max);
1)сила всех и глубина вростания репки, так же состояние здоровья каждого и состояние почвы
а так же не завалялась ли где нормальная лопата
2)смотря что такое по братски, но зная карлсона, он возьмет себе большой
3)главное чтоб пончику хватило. а больше он все равно сделать не в состоянии
4) радиус двери, радиус вини, прирост от сгущенки, прирост от меда, кол-во того и другого, скорость похудения и тп
Популярные вопросы