Другие предметы, опубликовано 07.06.2020 01:59
Скажите чему будет равен k (желательно с объяснением, чтобы понять решение)
Program Primer;
var k, z: integer;
begin
z:=19;
k:=z+7;
while k>=2 do
k:=k-2;
k:=k+1;
wrileln(k)
end.
Другие предметы, опубликовано 09.01.2019 16:01
Другие предметы, опубликовано 09.01.2019 16:01
Другие предметы, опубликовано 09.01.2019 16:01
Другие предметы, опубликовано 09.01.2019 16:01