Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
если фарфор, то керамика -глина заваривать чай
какие именно? электрические или обычные? если простые чайники то из стали нержавейкиа электрические разные бывают
var
x : array [1..15] of integer;
i : integer;
min : integer;
kol_nol : integer;
begin
kol_nol : = 0;
for i: =1 to 15 do
write ("введите элемент массива: ");
readln(x[i]);
end;
min : = x[1];
for i : = 0 to 15 do
if (x[i] > 0) then
if (x[i] < min) then
min : = x[i];
if (x[i] = 0) then
inc(kol_nol);
writeln(min);
writeln(kol_nol);
s,n,i: integer;
write('введите количество чисел');
readln(n);
s: =0;
for i: =1 to n do
s: =s+i*3;
writeln(s);
end.
Популярные вопросы