<span>Словосочета́ние — это соединение двух или нескольких
знаменательных слов, связанных по смыслу и грамматически, служащее для
расчленённого обозначения единого понятия (предмета, качества, действия и
др.).</span>
Ответ:..............
Объяснение:.................
//Pascal ABC.NET v3.0 сборка 1111
Var
a:integer;
begin
writeln('Our burgers do not prepare you for the exam, but will learn to code');
writeln('Value of burgers:');
readln(a);
case a of
1:writeln('Mineral water');
2:writeln('Coca-cola bottle');
end;
if a>=3 then writeln('One more burger');
end.<span>
Пример ввода:
10
Пример вывода:
One more burger
</span>
От слова рота к слову полк. рота , ____ , ____ , ____ , ____ , полк. бант , __ , __ , __ , __ , коса море , __ , __ , __ , __ ,
ИРИНА9997 [108]
<span>рота- роза- лоза- поза- пола- полк
бант- бунт- бурт- борт- корт- кора- нора
море- горе- гора- нора- нога- нуга- дуга- душа- суша
миг- маг- май- чай- час- чес- вес- век </span>
1.
var i,k:integer;
begin
for i:=150 to 225 do
if i mod 7=0 then k:=k+1;
write(k)
end.
2.
var a,s:integer;
begin
read(a);
while a>0 do
begin
s:=s+a mod 10;
a:=a div 10
end;
if s mod 10=0 then write('Правда') else write ('Неправда')
end.