Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
мальчики плывут на тот берег
один возвращается
мама плывет на тот берег
второй мальчик возвращается
два мальчика плывут на тот берег
отец плывет на тот берег
var a: array[1..100] of integer;
i,ms,ps: integer;
begin
{vvod massiva a}
for i: = 1 to 100 do
if a[i] > 0 then ps: =ps+a[i]
else ms: =ms+a[i];
writeln(ps,ms);
end.
разрабатывать алгоритмы может только человек.
исполняют алгоритмы люди и всевозможные устройства – компьютеры, роботы, станки, спутники, сложная бытовая техника и даже детские игрушки.
var x,y: integer;
readln(x);
if x< 1 then y: =-2*x+11
else y: =x*x-2;
writeln(y);
Популярные вопросы