1. заливаем в бочку 5 литров. 2. зачерпываем 5литровым и выливаем в 9-литровое ведро. 3. снова зачерпываем 5 литровым и льём в 9-литровое доверха. в 5-литровом остаётся 1 литр. его выливаем в бочку к уже там находящимся 5 литрам. итог - 6 литров.
Ответ дал: Гость
var n, i: integer; x, s: real; begin repeat writeln('введите количество слагаемых: '); readln(n) until n> 0; writeln('введите ''x'': '); readln(x); for i : = 1 to n do s : = s + sin(i * x); writeln(s); readlnend.
Ответ дал: Гость
var a,b,c,nchet,nnechet: integer;
begin
nchet: =0;
nnechet: =0;
writeln('введите 3 числа');
readln(a,b,c);
if a mod 2=0 then nchet: =nchet+1 else nnechet: =nnechet+1;
if b mod 2=0 then nchet: =nchet+1 else nnechet: =nnechet+1;
if c mod 2=0 then nchet: =nchet+1 else nnechet: =nnechet+1;
writeln('количество четных чисел равно ',nchet,', количетсво нечетных равно ',nnechet);
Популярные вопросы