program raf105;
var fam,pol: array[1..100] of string;
n,i: integer;
begin
write('введите количество детей: ');
readln(n);
writeln('вводите фамилии и пол (заглавной буквой м/ж)');
for i: =1 to n do
begin
writeln;
write('[',i,'] ','фамилия: ');
readln(fam[i]);
write(' пол: ');
readln(pol[i]);
end;
writeln;
writeln('фамилии девочек начинающиеся на "а" и мальчиков заканчивающиеся на "в"');
for i: =1 to n do
if (fam[i][1]='а') and (pol[i]='ж') or (fam[i][length(='в') and (pol[i]='м')
then writeln(fam[i]);
end.
язык программирования pascalabc
давайте рассмотрим, что происходит в следующей части кода:
n : = ves[1]нц для k от 1 до 14если ves[k] < n тоn : = ves[k]всекцсначала мы присваиваем переменной n значение первого элемента массива ves. затем создаём цикл с итератором k, который проходит значения от 1 до 14. в каждой итерации (1 проход всех операторов / выражений в цикле) мы проверяем, является ли n больше k-того элемента и, если это условие не выполняется (то есть ves[k] > n), то это значение присваивается переменной k. что это значит? то, что мы находим минимальный элемент. мы можем не работать дальше с этой частью кода, а просто найти минимальное значение в массиве.
ответ21
2рассмотрим данную часть кода:
score : = 0; нц для k от 1 до 9если a[k] > = 9 тоscore: = score+a[k]всёкцмы объявляем переменную, которая, судя по названию, хранит сумму чего-то. затем в цикле от 1 до 9 мы проверяем, является ли k-тый элемент массива a больше или равен 9. если так, то мы добавляем это число в переменную score. что это значит? что мы находим сумму всех элементов, которые больше или равны 9. такие элементы:
11 12 13 9
ответ45
3абсолютно противоположно первому. здесь мы находим максимальный элемент.
ответ41
Поделитесь своими знаниями, ответьте на вопрос:
Составить циклический алгоритм приготовления блинов информатика 4 класс