Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ввод x = 1, y = 3
x = 3 - 1= 2
y = 2 * 2 = 4
x = 2 * 4 + 2 = 10
y = 4 + 10/2 = 9
вывод x = 10, у = 9
ответ. в результате работы программы получим: х = 10, у = 9.
jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf
var
x: array[1..15]of integer;
i,min,z: integer;
begin
min: =32000;
z: =0;
for i: =1 to 15 do
readln(x[i]);
if x[i]> 0 then if x[i]< min then min: =x[i];
if x[i]=0 then inc(z);
end;
writeln(min);
writeln(z);
end.
program;
max,val: integer;
label
start, ends;
max: =-50;
val: =50;
start:
if val> max then val: =val-10
if val=max then goto ends;
goto start;
ends:
Популярные вопросы