Марина, Лариса, Жанна и Катя умеют играть на разных инструментах (пианино, виолончели, гитаре и скрипке), но каждая только на одном. Они же знают иностранные языки (английский, французский,немецкий и испанский), но каждая каждая только один. Известно: 1) девушка, которая играет на гитаре, говорит по-испански; 2) Лариса не играет ни на скрипке, ни на виолончели и не знает английского языка; 3) Марина не играет ни на скрипке, ни на виолончели и не знает ни немецкого, ни английского языка; 4) девушка, которая говорит по-немецки, не играет на виолончели; 5) Жанна знает французский язык, но не играет на скрипке.Кто на каком инструменте играет и какой иностранный язык знает.
С ОБЪЯСНЕНИЕМ
program z1;
var a:array [1..6] of integer;
i,s:integer;
begin
s:=0;
randomize;
write ('Массив: ');
for i:= 1 to 6 do
begin
a[i]:=random(18);
write(a[i],' ');
s:=s+a[i]
end;
writeln;
writeln ('Сумма элементов массива: ',s);
writeln ('Среднее арифметическое элементов массива: ',s/6:0:1)
end.
Объяснение:
Цикл:
1) присваиваем значение текущему элементу массива
2) выводим текущий элемент массива на экран
3) считаем сумму элементов массива
Выводим сумму элементов массива на экран
Выводим среднее арифметическое элементов массива на экран (делим сумму на количество элементов), используя форматированный вывод (указываем после второго двоеточия количество знаков после запятой при выводе числа)