1)110-7=103(количество человек,знающих один из языков)
2)103-87=16(количество человек,знающих только испанский язык)
3)75-16=59(количество человек,знающих оба этих языка)
Ответ:59 человек знают оба этих языка.
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
var t:=Readinteger('T=');
Writeln('S=',a.Where(p->p>t).Sum)
end.
<u>Пример</u>
n= 15
13 20 41 -5 -41 4 -2 -30 21 3 -35 23 -27 -25 41
T= 12
S=159
Var
a, b, c: integer;
begin
read(a, b, c);
writeln('P = ',a * b * c);
writeln('S = ',a + b + c);
writeln('A = ',(a + b + c) / 3);
end.
F,x переменные
begin начало счета
writeln ввод х с новой троки
readln задать значение х с новой строки
Программа решает уравнение
Выводит значение f
readln задерка экрана
конец программы.
Данная программа считает уравнение F;=-2*x*x+4*x-1 .4 с значениями которые задает пользователь.